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Vorwort 

Aller guten Dinge sind drei! 

Hier also das dritte Colour-Genie Buch. Wieder einmal hatten wir Zeit 
und einen freien Rechner, so entstand das 

»Colour-Genie Buch lll« 

Wir hoffen, daB auch dieses Buch Ihnen wieder viele Anregungen 
vermittelt und Sie viel Freude an den gelisteten Programmen haben 
werden. 

Unter anderem finden Sie in diesem Buch viele Programme fur Disketten- 
besitzer, so zum Beispiel ein Programm zum alphabetise hen Sortieren 
des Inhaltsverzeichnisses. Auch die Spiele kommen wieder nicht zu kurz. 
Wieder hat Jurgen Buchmtiller extra fur das Buch in die Tasten, will sagen, 
das Keyboard gegriffen und heraus kam „Ballons". 

Da die in diesem Buch gelisteten Programme doch schon relativ schwierig 
sind, empfehlen wir Ihnen, in jedem Fall zuerst die Colour-Genie- 
Biicher I und II durchzuarbeiten. 

Wir hoffen, da6 Sie auch an diesem Buch wieder Ihre Freude haben 
werden! 

Bonn, im Mai 1984 

Kalle Braun 
Jurgen Buchmuller 
Frank Seger 
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flllgemeine Hinweise 

Bitte beachteri Sie. dap die Zeichen 'J' und 'A' in den Listings 

den Zeichen '(S>' bzw. '[' auf Ihrer Tastatur entsprechen. 

Die meisten Basic-Programme in diesem Buch sirid 'entpackt', 
d.h. nach jedem Befehl folgt em Leerzeichen, in jeder Zeile 
steht nur em BefehL usw. Es ist naturlich nicht notlg. alle 
diese Leerzeichen mit einzugeben, es erleichtert jedoch das 
Programmverstandnis und die Fehlersuche. 

Falls Sie sich tiefer in die Maschinensprache Ihres Colour- 
Genie einarbeiten wollen, empfeMen wir Ihnen 

' Progrommierung des 280' von Rodrtay Zoks und 

das neue TCS Colour-Genie-ROM-List ing nut 360 Seiten Umfangi 



Regierungsspiel 



Auf den folgenden Seiten finden Sie das Listing einer sehr 

interessanten Regierungssimulet ion . 

Bis zu sechs Spieler konnen dort urn die Wette spielen. 

Man hann auch alleine spielen. jedoch ist dies noturlich nicht 

So spannend. 

Wenn Sie auch einen Sinn fur anspruchs vol I e Spiele haben, 

werden Sie an diesera Programm lange Zeit Freude haben. 

Achtung: Das Regierungsspiel benotigt 32K RAM. 

Das Programm gibt auf Wunsch eine kurze Einfuhrung (s. Zeile 
7330 Tf). jedoch sollen hier nocn einige zusatzliche Bemerk- 
ungen zum Spiel verlauf gemacht werden. 

Das 2iel jedes Spielers ist, als erster Konig bzw. Homgin zu 
werden. Im Verlauf des Spiels wird standig die Leistung jedes 
Spielers ausgewertet und lhm danach ein Titel zugewiesen. 
Die Titel sind: 
Fur einen Mann: SIR. BARON. GRAF, MARQUIS. HERZOG. GR0SSHERZ0G 

PRINZ und *K0NIG* 
Fur eine Frau. LADY. BARONESS, GRAFIN, MARQUISE, HERZOGIN. 

GROSSHERZOGIN, PRINZESSIN und »K0NIGIN* 
Einen Titel den man einmal erreicht hat. hann man nicht mehr 
verl ieren . 

Wie im richtigen Leben. hat nan auch hier nicht bel lebig 
viel Zeit ui Konig bzw. Honigin zu werden. CEs sei denn man 
andert Zei le 560. ) 

Zu Beginn geben Sie die Zahl der Spieler, deren Namen und die 
Spielstarke ein. 

Oeder Spieler spiel t dann eine Runde tein Oahr). 
Das 1. Bild zeigt Getreidevorrate, Get reidepreis . Landpreis 
u.s.w. an. Hier hann man Getreide und Land kaufen Oder 
verkaufen. Interessant ist die Spekulation mit Getreide und 
Land uber ein 3ahr hinaus. Achten Sie also auf die Preise ' 
Anschl legend geben Sie Getreide an die Untertanen, hier sol I ten 
Sie nicht weniger als die angezeigte Mindestmenge ausgeben. 
Beachten Sie, dap man mindestens 20 Prozent seines 
Get reidevorrats zuruckhalten mu(3, und dap man aber auch 
mindestens 20 Prozent seines Set reidevorrats ausgeben mu0. 
Wenn man wesentlich mehr als die gefordete Menge Getreide an 
die Bevolkerung ausgibt. so Ziehen weitere Burger zu . Dies 
macht sich positiv bei den St aatseinkunf t en bemerkbar. Nach dem 
Bildschirm, der zeigt, wieviele Untertanen geboren wurden etc., 
folgt der Bildschirm. der die gewahtten Steuersatze und die 
l-arte der Ger ichtsbarkei t anzeigt. 



Zur Ger ichtsbarkei t ist zu sagen, dap gro&ere Harte mehr 
Qeld einbringt, jedoch das wirtschaf t I iche Wachstum dadurch 
bremmst, dap jedes Hahr Untertanen dem Gericht entriiehen. 
Ftuperdem wirkt sich harte Dustiz ungunstig auf den Titel aus . 

Anschl lepend zeiehnet das Programm eine Landharte. 

Die Grope der Harte zeigt Ihnen die Grope Ihres Landes. 

Oben links sehen Sie eine Turin. Dieser Turn zeigt die Starke 

Ihrer Verteidigung - schrumpft er. sollten Sie sofort Sotdaten 

kauTen, sonst kann es passieren. dap die anderen Spieler 

Ihnen Land abnehnen . 

Am rechten Rand der Karte wird ein stilisiertes Pferd mit 

einem Landarbeiter gezeichnet . Wenn dieser an der oberen 

Grenze steht. wird das gesamte Land genutzt. Ist dies nicht 

der Fall, empfiehlt es sich durch hohere Get reideasugaben 

mehr Untertanen zu bekommen. 

Wenn man Patast, Hathedrale, Marhtplatze Oder Wollfabriken 

gekauft hat, werden diese ebenfalls in die Karte eingezeiehnet . 

Nach der Harte folgt eine Liste von moglichen Staatsanschaf f - 
ungen. Drucken Sie die jewel lige Zahlentaste, un das gewunschte 
Gut zu kaufen. Mit <6> kann man hier ouch eine Vergleichs- 
ubersicht bekommen. 

Sie konnen Ihre Staatskasse auch in gewissem Mape verschulden, 

jedoch mussen Sie fur Ihre Schulden Zinsen zahlen. 

Ist die Verschuldung zu hoch droht Ihnen der Bankrott ' 

Das Programml ist ing : 



10 RANDOM 

20 CLEAR 700 

30 DEFINT A-0. M-Q, T. V. W 

40 V(O)=1400 

50 DATFTSir "."Baron ","Graf "."Marquis "."Herzog ", "Grossherzog ","Pr 

inz "."it Koenig *" 

60 DATPTLady "."Baroness "."Graefin "."Marquise "."Herzogin "."Grosshe 

rzogin "."Pr inzessin ","* Koenigin *" 

70 DATA "Santa Par a via". "Fiumaccio". "Torn eel la", "Mo I i net to", "Font am le 

" , "Romagna" 

80 CLS 

90 PRINT 

100 COLOUR 16 

110 PRINT § 326, CHRJC23) ;"Santa Paravia und Fiumaccio" 

120 COLOUR 5 



130 PRINT § 366, STRINGtC27, 2175 

140 FOR A=0 TO 555 

150 NEXT 

160 CLS 

170 PRINT 

180 FOR A=l TO 16 

190 READ Pit 

200 NEXT 

210 COLOUR 16 

220 PRINT"Wieviele Mitspieler ■>" 

230 COLOUR 5 

240 PRINT" CE 1 ngobe zwischen 1 und 63"; 

250 GOSUB 7290 

260 F=VAL(A») 

270 IF F<1 OR F>6 THEN CLS: GOTO 210 

280 FOR A=l TO F 

290 READ TIC A) 

300 CLS 

310 PRINT 

320 PRINT"Wer regiert ":T*CA)j 

330 COLOUR 16 

340 INPUT NKfl) 

350 COLOUR 5 

360 N*CA)=NKA)+" von " +T*CA) 

370 CLS 

380 PRINT"Ist ";N»CA> 

390 PRINT"ein ": 

400 COLOUR 16 

410 PR I NT "Mann "; 

420 COLOUR 5 

430 PRINT"oder eine "; 

440 COLOUR 16 

450 PRINT'Trnu "t 

460 COLOUR 5 

470 PRINT'"?"; 

480 VCA)=0 

490 GOSUB 7290 

500 IF Ato'Vl" AND A$<>"F" AND Ato"m" AND AS <>"f" THEN 480 

510 IF LEFTKAt, 1J-"F" OR LEFTtCAS, l)="f" THEN V(AD=8 

520 G(A)=25 

530 H(A).10 

540 ICA)=5 

550 JCA)=2 

560 0CAD=1420+RND(35) 

570 KCPJ^IOOO 

580 LCA3=10000 

590 RCAJ=5000 

600 TCA)=1 

610 UCAJ=1 

620 NCA)=4 

630 P(A)=25 

640 QCA)=5 



650 


MCF>)=25 


660 


SCA>=200O 


670 


NEXT 


680 


FOR fl-1 TO F 


690 


RESTORE 


700 


B=VCPl)+T(A) 


710 


FOR C = l TO B 


720 


READ TICA) 


730 


NEXT C 


740 


NEXT A 


750 


PRINT 


760 


PRINT 


770 


PRlNT"Wuenschen Sle eine Einweisung ° (0/N)"; 


780 


GOSUB 7290 


790 


IF AS = "N" OR f\S*"n" THEN 820 


800 


IF ftK>"3" AND AX)"]" THEN 750: GOSUB 7330 


810 


GOSUB 7330 


820 


CLS 


830 


COLOUR 16 


840 


PRINT"1 :Fmfaenger , 2: Fortgeschri t tener , 3:Profi, 4» 


Grossmeister" 


850 


COLOUR 5 


860 


PRINT 


870 


PRINT"Eingabe Her Spiel staerke"; 


880 


GOSUB 7290 


830 


UCOJ=VRL(A») 


900 


IF U(0X1UC0) = 1 


910 


IF Uf.01 >4U(0)=4 


920 


U(03=U(OJ+5 


930 


E = E+1 


940 


IF TCE3=-1 THEN E=E+1 


950 


IFCTC1XDRNDCTC2) < 1 3 ANOC T( 3)< 1) ANDC T( 4) <1)ANDCTC5) < 1) RNDC Tt 65 < 1 3 T 


HEN 


7660 


960 


IF E>F THEN E=Ot YC 0) =YC 03 +1 : GOTO 930 


970 


IF YCO) >OCE)THEN 930 


980 


IF YC0)=0CE)THEN 1340 


990 


GOSUB 1780 


100C 


GOSUB 2860 



1010 G0SU8 3720 

1020 GOSUB 3300 

1030 GOSUB 4540 

1040 GOSUB 5930 

1050 GOSUB 6410 

1060 GOTO 930 

1070 CLS 

1080 PRINT"Adel ige Soldaten Klerus Haendler" 

1090 PRINT 

1100 FOR A=l TO F 

1 1 10 COLOUR 5 

1120 PRINT T$CA3 : N*(A3 

1130 COLOUR 16 

1140 COLOUR 2 

1150 PRINT N(fl); TRBC73PCA): TABC 163QC A) ; TAB(23)MCA3 



1160 COLOUR 16 

1170 NEXT 

1190 COLOUR 5 

1200 PRINT STRINGJC40. 217): 

1210 COLOUR 16 

1230 PRINfUntertanen Land Staatshasse" 

1240 FOR A=l TO F 

1250 COLOUR 5 

1260 PRINT TSCA): NJCRJ 

1270 COLOUR 2 

1280 PRINT SCR); TfiBt 1 1 )L t A) ; TABC2UKCR) 

1290 NEXT R 

1300 COLOUR 16 

1310 PRINT 

1320 INPUT" COrueche RETURN) ";fl* 

1330 RETURN 

1340 CLS 

1350 PRINT 

1360 PRINT"Sehr schlechte Nachrichten" 

1370 PRINT 

1380 PRINT T$CE): NICE) 

1390 PRINT"ist gerade gestorben." 

1400 T(E)«-1 

1410 Y=RNDCS1 

1420 IF YC0)>1450 PRINT**noch longer RegentschaTt und in hohem fll ter" 

: GOTO 1480 

1430 IF Y<4 PRINT"on Lungenentzuendung noch emem kalten Winter in se 

inem Schl oss . " 

1440 IF Y = 5 PRINT"waenrend einer Pockenepideme . " 

14S0 IF Y = 4 PRINT"an Thyphus nach Genuss vol schmutz lgem Wasser." 

1460 IF Y=6 PRINT"nach eineit Raubueber f al 1 waehrend einer Reise. 

1470 IF Y>6 PRINT"an Rleisclwergi f tung . " 

1480 PRINT 

1490 INPUT"<Oruecke RETURN )"; A* 

1500 IF F=l THEN 7650 

1510 GOSUB 4540 

1S20 QOSUS 1070 

1S30 GOTO 930 

1540 I<=INTCIi] 

1550 RETURN 

1560 Ci =INTCC ' ) 

1570 RETURN 

1580 Si =INTtS> ) 

1590 RETURN 

1600 K(E)=INTCKCE33 

1610 RETURN 

1620 Z=RNDCflD*SCE)/100 

1630 ZX = Z 

1640 COLOUR Z 

1650 PRINT ZK; 

1660 COLOUR 16 

1670 PRINVSkLaven in diesem Jahr geboren" 

1680 SCE)=SCE)+ZK 



1690 

1700 
1710 

1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 
1910 
1920 
1930 
1940 
1950 
1960 
1970 
1980 
1990 
2000 
2010 
2020 
2030 
2O40 
2050 
2O60 
2070 
208O 
2090 
2100 
2110 
2120 
2130 
2140 
2150 
2160 
2170 
2180 
2190 
2200 
2210 
2220 
2230 



gute Ernte" 

hervorragende Ernte" 



RETURN 

Z=RN0CA)*SCE)/100 

ZK = Z 

COLOUR 3 

PRINT ZX; 

COLOUR 16 

PRINT"Shlaven in diesem Oohr gestorben." 

SCE)=SCE)-ZK 

RETURN 

W=( RN0(5)+RNDC6))/2 

ON H GOTO 1800. 1820. 1840. 1860. 1880 

W*="Troehen. eine Hungersnot droht i i" 

GOTO 1900 

W»="Schlechtes Wetter, duerftige Ernte" 

GOTO 1900 

W$="Normal es Wetter, durchschni t t I iche Ernte" 

GOTO 1900 

Wt="Schoenes Wetter, 

GOTO 1900 

W*="Exzel lentes Wetter. 

GOTO 1900 

R=RND<50) 

R<E)=(R(E)*100-RCE)*R)/100 

X-LCE) 

Y=CStE)-D(E)*100J»5 

IF Y<OY=0 

IF Y<X THEN X = Y 

Y*R(E)*2 

IF Y<X THEN X = Y 

R(E)-RCE)-X/2 

Y=W-.5 

H' = X*Y 

R(E)=RCE)+Hi 

D'=NCE)*100+CCE)*40+MCE)*30+PtE)*10+SCE)*5 

L • C 3KW+RND C 6 ) +RND ( 6 ) + 1 ) / 1 

IF W=l THEN L-L-l 

IF Hi < 1Y-2: GOTO 2080 

V=Di/H< 

IF Y>2Y=2 

IF Y< ,8Y=.8 

L = L*Y 

L=INTCL*10) 

L=L/10 

Z = 6-W 

G=£Z*3+RND(5)+RNDC5J )/5*Y*20 

RETURN 

COLOUR 5 

PRINT STRINGK40, 217); 

COLOUR 16 

PRINT"Rat ten vernichteten ": 

COLOUR 3 

PRINT R; 

COLOUR 16 } 

PRINT" « deiner" 

PRINT"Get reidereser ven" 



2240 PRINT 

2250 PRINT Wi 

2260 PRINT" C": 

2270 COLOUR 2 

2280 PRINT Hi : 

2290 COLOUR 16 

2300 PRINT" Zentner )" 

2310 COLOUR 5 

2320 PRINT STRINSJC40. 217): 

2330 IF KCEX32766 GOSUB 1600 

2340 COLOUR 16 

23S0 PRINT"Getreide Getreide Getreide- Land-" 

2360 PRINT"Vorraete Bedarf preis preis" 

2370 COLOUR 2 

2360 PRINT RCE): TftBClOO's TABC20JG; TABC3UL 

2390 COLOUR 16 

2400 PRINT"Zentner Zentner 1000 Z. Hektar" 

2410 COLOUR 5 

2420 PRINT STRINGJC40, 217) i 

2430 COLOUR 16 

2440 PRINT"Staatskasse: " ; 

2450 IF KCE)>0 THEN COLOUR 2 ELSE COLOUR 3 

2460 PRINT KCE) 

2470 RETURN 

2480 J=C3(E)*300-500)*T(E) 

2490 ON 0(E) GOTO 250O. 2520. 2540, 2560 

250O 3*="sehr gerecht" 

2510 GOTO 2570 

2520 3t="gemaessigt" 

2530 GOTO 2570 

2540 3l = '"streng" 

2550 GOTO 2570 

2560 0*="sehr streng" 

2570 Y=150-GCE)-H(E)-ICE) 

2580 IF Y<1Y=1 

2590 C I = C N ( E J * 1 80+Q C E ) *75+M( E ) *20 ) * C Y/ 100 ) +UC E ) * 1 00 

2600 S'=(NCE)*50+H(E)*25+UCE)*10)*( Y/100) *C5-3CE) )/2 

2610 I i=NCE)*25O+UCE)*20+( 10*3 C E ) *NCE ) ) *C Y/100) 

2620 C '=CI*GCE)/100 

2630 IF Ci<32760 GOSUB 1560 

2640 Si =S'*HCE)/100 

2650 IF Sl<32760 GOSUB 1580 

2660 I i =1 l*I(E)/100 

2670 IF I'<32760 GOSUB 1540 

2680 COLOUR 16 

2690 PRINT"Staatseinnahmen ": 

2700 COLOUR 2 

2710 PRINT O+Ci+S'+I'; 

2720 COLOUR 16 

2730 PRINT"Gulden" 

2740 COLOUR 5 

2750 PRINT STRINGSC40. 217): 

2760 COLOUR 16 

2770 PRINT"ZoUge- Umsatz- Eink. Gericht" 
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steuer 



\HCE) ;' 
I' . ;>;' 



X", 
Gl , 



steuer' 



1(E) ;"K";TABC27)3* 



217) : 



217) i 



217) ; 



PRINT"buehren 

COLOUR 2 

PRINT GCE) j"K 

PRINT C < , S' , 

COLOUR 5 

PRINT STRINQSC40, 

COLOUR 16 

RETURN 

CLS 

PRINT 

COLOUR 16 

PRINT T*CE) ; NKE) 

COLOUR 5 

GOSUB 2150 

COLOUR 5 

PRINT STRINGSC40 

COLOUR 16 

PRINT"1 ;Getreide haufen","2 

PRINT"3:Lend kouren "."4 

PRINT"Oede andere Taste zum 

COLOUR 5 

PRINT STRINGIC40 

COLOUR 16 

GOSUB 7290 

I i=VRLCft$) 

PRINT 

IF I">4 THEN CLS 

IF I i < 1 THEN RETURN 

ON IiGOTO 3070, 3160. 

PRINT 

INPUT"WievieL Getreide kaufen":I 

H£E)=HCE)-C I 'MG/1000) 

RCE)=RCE)+I < 

CLS 

PRINT 

PRINT TitE) : NS C E ) 

GOSUB 2320 

GOTO 2920 

INPUT"WievieL Getreide 

IF I ' >fi(E)PRINT". . . so 

KCE)=KCE) + CI " *Q/ 1000 J 

RCE)=R(E)-I ' 

GOTO 3110 

INPUT"Wieviel Hektar kaufen":Ii 

LCE)=LCE)+I ' 

KCE)=K(E)~C I i ML) 

GOTO 3110 

INPUT"Wieviel Hektar verkauf en" ; I i 

IF I i > CLCE) -5000) PRINT". . . so viel 
TO 3250 

3270 L(E)=LCE)-I I 
3280 KCE)=KCE)+( I ' *L 3 
3290 GOTO 3110 



2780 
2790 
2SO0 
2810 
2820 
2830 
2840 
2850 
2860 
28T0 
2880 
2890 
2900 
2910 
2920 
2930 
2940 
2950 
2960 
2970 
2980 
2990 
3000 
3010 
3020 
3030 
3040 
3050 
3O60 
3070 
3080 
30 90 
3100 
3110 
3120 
3130 
3140 
3150 
3160 
3170 
3180 
3190 
3200 
3210 
3220 
3230 
3240 
3250 
3260 



Getreide verhaufen' 
Land verkaufen" 
Fort fahren" 



GOTO 2950 



3210, 3250 



verhaufen" ; I i 

viel hast Ou nicht' 



PRINT: GOTO 3160 



kannst Du nicht verhaufen" 



GO 



11 



3300 CLS 

3310 PRINT 

3320 PRINT TtCE): N$CE) 

3330 PRINT 

3340 GOSUB 2480 

3350 PRINT 

3360 PRINT" 1. Zol Igebuehren" 

3370 PRINT"2. Umsat zs teuer " 

3380 PRINT"3. Eink.steuer" 

3330 PRINT"4. Gericht" 

3400 PRINT 

3410 PRINT"CTippe Nummer zum Aendern" 

3420 PRINT" zur Fort setzung)"! 

3430 60SU6 7230 

3440 I=VALCA*) 

3450 PRINT 

3460 IF I>4 CLS: GOTO 3350 

3470 IF Id THEN 3680 

3480 ON I GOTO 3490, 3540. 3580, 3620 

3490 INPUT"Neue Zol Igebuehren CO bis 100 XJ";I 

3500 IF I>1001=100 

3510 IF 1(01=0 

3520 GCE)=I 

3530 GOTO 3300 

3540 INPUT"Neue Umsotzs teuer CO bis 50 M)";I 

3550 IF(I>50 5 0RCKO)I=5 

3560 H(E)-I 

3570 GOTO 3300 

3580 INPUT"Neue Einkonmensteuer CO bis 25 H)":I 

3590 IFC X0)ORCI>25)THEN 1=0 

3600 I C E ) = I 

3610 GOTO 3300 

3620 PRINT"Gericht : Usehr gerecht 2 .gemaessigt 3.5treng 4.sehr St 

reng": 

3630 GOSUB 7290 

3640 I=VALCA$) 

3650 IFC I>430RC K13THEN 1=1 

3660 J(E)=I 

3670 GOTO 3300 

3680 KCE)=KCE)+Ci+Si+I 1+3 

3690 IF KCEXO THEN K(E) *KCE)*1 .5 

37O0 IF H(EXC-10000*TCE)) THEN 6900 

3710 RETURN 

3720 COLOUR 16 

3730 INPUT"Wieviel Getreide gibst du aus":Gi 

3740 IF Gi <CRCE)/5)PRINT"Du musst m indes tens 20X ausgeben ■ ": GOTO 373 



3750 IF Gi >CR(E)-CR(EJ/5J } PRINT"Du musst mind. 20K zurueckbehal ten": 

GOTO 3730 

3760 RCEXRCEXG' 

3770 CLS 

3780 PRINT 

3790 PRINT TS(E): N$(E) 

3800 PRINT 
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3810 Z=G'/D'-1 

3820 IF Z>0Z=Z/2 

3630 IF Z> .25Z=Z/10+.25 

3840 ZX=50-QCE)-HCEJ-I(E) 

3850 IF ZX<0ZK=2X«aCE) 

3660 ZS=ZK/10 

3870 IF ZX>0ZX=ZJi+3-3CE) 

3880 Z=Z+CZK/10) 

3890 IF Z> .5Z*.5 

3900 IF Gi <CD«-13THEN 4250 

3910 A = 7 

3920 G0SU6 1620 

3930 fl = 3 

3940 GOSUB 1T00 

3350 IFtQCE)+H(E)X35l1<e)=f1<:e)+RNDC41 

3960 IF ICEXRNDC20)N(E)=N(E)+RNDC2J-1: Qt E3 =Q(E)+RNOC33 - 1 

3970 IF G> <(DI+DI*.3)THEN 4160 

3980 ZX=StE)/1000 

3990 Z=CG'-D< 3 /D 1*10 

4000 Z-Z*ZX*RN0C25:)+RND(40) 

4010 IF Z>32000Z=32000 

4020 ZX = Z 

4030 Z=RNDCZ»3 

4040 COLOUR 2 

4050 PRINT Z; 

4060 COLOUR 16 

4070 PRINT'-Untertanen kamen in die Stadt." 

4080 S(E)=SC£)+Z 

4090 UCE3=UCE3+.5 

4100 Z«=Z/5 

4110 Z=RNDCZS3 

4120 IF Z>5OZ=50 

4130 M(E)=MCE)+Z 

4140 N(E)=N(E)+1 

4150 QCE3=Q:E)+2 

4160 IF J(E)(3 THEN 4240 

4170 i =SCE)/100*C3CE3-2)*(3(E)-2) 

4180 3' =RNDta> 3 

4190 S(E)=SfEl-3' 

4200 COLOUR 3 

4210 PRINT 3 I ; 

4220 COLOUR 16 

4230 PRINT"Untertanen entfliehen dem Gericht." 

4240 GOTO 4350 

4250 X=*CD i -G> )/D'*100-9 

4260 X«=X 

4270 IF X>65 THEN X-65: M(E1=M(E)/2 

4280 IF X<OXH=0: X=0 

4290 A=3 

4300 GOSUB 1620 

4310 A=X«+8 

4320 eosue 1700 



( 4330 IF ZK>1000 THEN UCE)=U£E)/2 
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COLOUR 2: PRINT Zi 



4340 GOTO 4160 

4350 Z*ACE3*75 

4360 KCE)=HCE)+Z 

4370 IF Z>0 PRINT"Dein Markt brachte" 

PRINT"Qutden Pacht ein" 
4380 IF SCEJ <32766S I =SCE ) : QOSUB 1580: S(EJ=SI 
4390 Z*DCED*(55+RNDt250H 

4400 IF Z>OKCE3=K(E)+Z: PRINT"Deine Wollfobrlk hatte";; 
T Z:: COLOUR 16: PRINT"Gulden Gewinn zu verzeichnen" 
4410 Z=P(E)*3 
4420 PRINT 

4430 PRINT"Du hast Demen Soldaten";Z; "Gulden Sold" 
4440 PRINT"au5bezahlt." 
4450 KCE>*KCE)-Z 

4460 IFCLCED/10O0)>PCEJTHEN 7070 
4470 IF(L(E)/500D<P(E)THEN 4520 
4480 FOR F>=1 TO F 
4490 IF A=E THEN 4510 
4500 IF PCPl)XPCE)*2.4)THEN 7070 
4510 NEXT 

4520 INPUT-CDrueche RE TURN J"; A* 
4530 RETURN 
4540 CLS 
4550 COLOUR 16 
4560 PRINT"0ohr": 
4570 COLOUR 2 
45S0 PRINT VCOJ 
4590 COLOUR 16 
4600 PRINT 

4610 PRINT TtCEJ; N*(E) 

4620 PRINT § 400."Nach Korte welter nit <RETURN>" 
4630 PRINT § 160. : 

4640 INPUT"<RETURN> druechen fuer Landkarte";XXS 
4650 FCLS 
4660 FGR 
4670 FCOLOUR 3 
4680 LK=(LCEJ/1000) 
4690 IF LX<10X=80: Y=27: GOTO 4770 

Y=27-CLX-10) : GOTO 4770 

Y-27-CLK-30) : 

Y=27-CLS-50) 

Y=27-CLK-70) : 

Y-27-CLK-90) 



COLOUR 16: 



COLOUR 2: PRIN 



4700 IF LX<30X=80: 

4710 IF LX<5OX=60: 
4720 IF LK<70X=40: 
4730 IF LK<9OX=20: 
4740 IF LK<110X=1 : 
4750 X=l 
4760 Y*7 
4770 REM 
4780 PLOT X 
4790 PLOT X 



GOTO 4770 
GOTO 4770 
GOTO 4770 
GOTO 4770 



Y TO 127. Y 

Y TO X. 47 



4S00 IF<PCE)-5)<<LCE)/1000)THEN 5060 
4810 FOR fl=X+l TO X+6 
4820 FOR 8-Y+l TO Y+5 



4830 PLOT A, 
4840 NEXT B 
4850 NEXT A 



B 
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4860 PLOT X, Y-l 

4870 PLOT X+2, Y-l 

4880 PLOT Xi4, Y-l 

4890 PLOT X+6. Y-l 

4900 IF(PCE)/2) <CLCE3/1000>THEN 5060 

4910 FOR A=X+7 TO X+10 

4920 FOR B-Y+l TO Y+S 

4930 PLOT ft, B 

4940 NEXT B 

4950 NEXT ft 

4960 PLOT X+8, Y-l 

4970 PLOT X+10, Y-l 

4980 NPLOT X+3, Y+2 

4990 NPLOT X+7 . Y+4 

5000 PLOT X+l , Y-l 

5010 PLOT X+9, Y-l 

5020 PLOT X, Y-2 

5030 PLOT X+2. Y-2 

5O40 PLOT X+8. Y-2 

5050 PLOT X+10. Y-2 

5060 Z=C(E3+1 

5070 IF Z>7 THEN Z=7 

5080 ON Z GOTO 5410. 5340, 5270, 5230, 5180, 5130, 5090 

5090 REM 

5100 PLOT 96, 30 TO 110, 30 

5110 NPLOT 102, 30 

5120 NPLOT 104, 30 

5130 FOR ft=96 TO 99 

5140 FOR B = 24 TO 29 

51S0 PLOT A, B 

5160 NEXT B 

5170 NEXT ft 

5180 FOR ft=107 TO 110 

5190 FOR B=24 TO 29 

5200 PLOT A, B 

5210 NEXT B 

5220 NEXT ft 

103, 24 



5230 


REM 






5240 


PLOT 103, 


22 


TO 


5250 


PLOT 102, 


23 




5260 


PLOT 104. 


23 




5270 


FOR A- 101 


TO 


105 



5280 FOR B-25 TO 26 

5290 PLOT ft, B 

5300 NEXT B 

5310 NEXT ft 

5320 NPLOT 101 . 25 

5330 NPLOT 105. 25 

5340 FOR fl=100 TO 106 

5350 FOR B'27 TO 23 

5360 PLOT ft, B 

5370 NEXT B 

5380 NEXT ft 
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5390 

5400 

5410 

5420 

5430 

PLOT 

5440 

B, PI 

9 

5450 

5460 

5470 

5480 

5490 

5500 

5510 

5520 

5530 

5540 

5550 

5560 

5570 

5580 

5590 

5600 

5610 

5620 

5630 

5640 

5650 

5660 

5670 

5680 

5690 

57O0 

5710 

5720 

5730 

5740 

57S0 

5760 

5770 

5780 

5790 

58O0 

5810 

5820 

5830 

5840 

5850 

5860 

5870 

5880 



NPLOT 102. 29 

NPLOT 104, 23 

Z=B(E)*2 

IF Z=0 THEN 5540 

IF Z>10 THEN PLOT 80, 

81, 32: PLOT 97, 32 

IF 2>8 THEN Z=9: FOR 



33: PLOT 82, 33: PLOT 96, 33: PLOT 98, 33 J 



A=87 TO 91: FOR B-31 



NPLOT 88. 33: NPLOT 90, 32: PLOT 88. 30: 

FOR ft=(89-Z)T0< 89+23 

FOR B=34 TO 36 

PLOT A, 6 

NEXT e 

NEXT A 

FOR A* t 90-2) TOC 90+23 STEP 2 

NPLOT A, 35 

NEXT A 

NPLOT 89, 36 

Z=SCE)-DCED*100 

IF Z<1 THEN Z=l 

z=z*5/lce:*io+i 

IF 2>10 THEN Z=10 

2=(2/10)*C45-V) 

Z=INTC47-Z) 

PLOT 119, Z TO 127, Z 

NPLOT 122. Z 

NPLOT 123. Z 

NPLOT 125. Z 

FOR A=119 TO 127 STEP 2 

PLOT A. Z+l 

NEXT A 

PLOT 118. Z-I 

PLOT 127, Z-l 

Z=ACE3*2 

IF Z=0 THEN 6780 

IF Z> t ( 126-X)-23Z=CC126-X)-2) 

FOR A = X TO X+Z STEP 2 

PLOT A, 39 

PLOT A+l , 39 

PLOT A+l, 40 

PLOT A+l , 41 

NEXT A 

Z=DCE) 

IF Z=0 THEN 5890 

IF Z>( 126-X)Z=126-X 

FOR A=126-Z TO 127 

FOR B=45 TO 4? 

PLOT A. B 

NEXT B 

NEXT A 

FOR A=127-Z TO 126 STEP 2 

NPLOT A. 46 

NEXT A 



TO 33: PLOT A, B: NEXT 
PLOT 90. 30: PLOT 89. 2 
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5890 
5900 
5910 
5920 
5330 
5940 
5950 
5960 
5970 
5980 
5990 
6000 
6010 
6020 
6030 
6040 
6050 
6060 
6070 
6080 
6090 
6100 
6110 
6120 
6130 
6140 
6150 
6160 
6170 
6180 
6190 
6200 
6210 
6220 
6230 
6240 
6250 
6260 
6270 
6280 
6290 
6300 
6310 
6320 
6330 
6340 
6350 
6360 
6370 
6380 
6390 
6400 
6410 



PRINT"1 . 
PRINT"2. 
PRINT"3. 



1000 Gulden" 
2000 Gulden" 
3000 Gulden" 
5000 Gulden" 
500 Gulden" 



REM 

60SUB 7290 

LQR 

RETURN 

CLS 

PRINT 

PRINT TS<E) ; Nf C E ) 

PRINT"Staatsanschaf fungen" 

PRINT 

Marktplatz 

Ulol 1 fabrih 

Palast CTeil) 
PRINT"4. Hathedrale CTeil) 
PRINT"5. 20 Soldaten 
PRINT 

PRINT"Du hast "; 

IF H(E)<0 THEN COLOUR 3: PRINT KCE)i ELSE COLOUR 2: PRINT KCE1; 
COLOUR 16 
PRINT"Gulden" 
PRINT 

PRINT"0 zur Fortsetzung. 6 fuer Vergleich" 
PRINT 

PRINT"Deine Wahl '>" : 
GOSUB 7290 
I=VftLCAS) 
CLS 

IF I<1 RETURN 

IF I>5 GOSUB 1070: GOTO 5930 
ON I GOTO 6220. 6180. 6270, 6320. 6370 
DtE)=DCE)+l 

kcei=kce:-2ooo 

UCE)=UCE)+.25 
GOTO 5930 
f=l(E)=ACE) + l 
MCEJ=M(EJ+5 
H(E)=K(E)-1000 

ucej=u(e:+. i 

GOTO 5930 

BCE1=BCE3+1 

NCE)=N(E3+RND(21 

KCE)-KCE)-3000 

UCE)=UCE)+.5 

GOTO 5930 

CCEi=CCE J+l 

Q(E)=QCE)+RNDC61 

KCE)=KCE)-5000 

UCE)=U(E)+1 

GOTO 5930 

PCE)=P(E)+20 

SCE)=S(E)-20 

KCE)=HCE 3-500 

GOTO 5930 

2=0 
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6420 


A=ACE) 






6430 


GOSUB 6780 






6440 


A=BCE) 






6450 


GOSUB 6780 






6460 


A-CCE) 






6470 


GOSUB 6780 






6480 


A=OCED 






6490 


GOSUB 6780 






65O0 


A*K£E)/50O0 






6510 


GOSUB 6780 






6520 


A=LCE)/6000 






6530 


SOSUB 6780 






6540 


A=MCE)/50 






6550 


GOSUB 6780 






6560 


ft-NCE)/5 






6570 


GOSUB 6780 






6580 


A=PCE)/50 






6590 


GOSUB 6780 






66O0 


A=Q(E)/10 






6610 


GOSUB 6780 






6620 


A-SCE)/2000 






6630 


GOSUB 6780 






6640 


a=uce:/5 






6650 


GOSUB 6780 






6660 


A=Z/U(0)-OCE)+1 






6670 


A=INT(A) 






6680 


IF A>8A=S 






6690 


IFCYC03+2J=OCE)TCE)=TtE3+l 






6700 


IF TCE) >=A THEN 6770 






6710 


T(E)=A 






6720 


RESTORE 






6730 


FOR B=l TO<TCE)+VCEJ ) 






6740 


READ Tt(E) 






6750 


NEXT 


■> 




6760 


IF T(EJ=8 THEN 6820 






6770 


RETURN 






6780 


IF Pl>10: A=10 






6790 


«=l= INTC (^J 






6800 


Z = Z+A 






6810 


RETURN 






6820 


CLS 






6830 


PRINT 






6840 


PRINT"Das Spiel ist vorbel < " 






6850 


PRINT TKE) ; NStE) 






6860 


PRINT"hat gewonnen" 






6870 


GOSUB 4680 






6880 


QOSUB 1070 






6890 


GOTO 7670 






6900 


CLS 






6910 


PRINT 






6920 


PRINT Tt(E)i NICE);" ist bankrott" 






6930 


PRINT 






6940 


PRINT"Gl aeubiger hoben das meiste Deines Eigentums 


beschlagn 
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ahmt i " 

6950 PRINT 

6960 INPUT"CDruecke R£TURN)";Pl* 

6970 A(E)=0 

6980 BCE)=0 

6990 C(E)=0 

7000 DCE)=0 

7010 L(E)=6000 

7020 UCE)=1 

7030 H(E)=100 

7040 MCE)=MCE)/2 

7050 R(E)=400O 

7060 RETURN 

7070 Z=0 

7080 FOR 1=1=1 TO F 

703O IF ft=E THEN 7130 

7100 IF PCflXPCE)THEN 7130 

7110 IF P(m<( 1 .2*CLCft)/1000n THEN 7130 

7120 IF PCfl)>PCZ)Z = Pl 

7130 NEXT 

7140 IF 2 = 0T»(0J=" Baron ": NIC 01 ="Peppone von Monterana hat"* A'=RND( 

90003+1000: GOTO 7160 

7150 rV =PCZ)*1000-L(Z)/3 

7160 IF fli >CLCE)-5000)Ai=(LtE)-5000)/2 

7170 PRINT T*(Z)t NtCZ) 

7180 PRINT"angegrif fen und beschl ognahmt " :A i 

7190 PRINT"Hektar Land'" 

7200 LCZ)=LCZ)+AI 

7210 LCE)=L(E:-fli 

7220 Z=RND(40) 

7230 IF Z>(P(E)-15)Z*PCE)-15 

7240 PRINT TICE); N$ C E ) ; Z 

7250 PRINT"Soldaten in der Schlacht gefallen." 

7260 P(E)*P(E)~Z 

7270 INPUT" CDruecke RETURN) " : ft% 

7280 RETURN 

7290 fll=INKEY* 

7300 R*=INKEV$ 

7310 IF ft* = *"* THEN 7300 

7320 RETURN 

7330 CLS 

7340 COLOUR 5 

7350 PRINT"Santa Paravia und Fuimaccio" 

7360 PRINT STRIN6$(40. 217); 

7370 COLOUR 16 

7380 PRINT"Ou regierst einen i tal ienischen Stadt-" 

7390 PRINT"staat aus den 15. dahrhundert . Regierst" 

7400 PRINT"du gut, bekommst du hoehere Titel, Der" 

7410 PRINT"1. Spieler, der Koenig(in) wird, hat" 

7420 PRINT"gewonnen . Regierst du schlecht, wird" 

7430 PRINT"deine Lebenszeit nicht reichen, urn " 

7440 PRINT"KoenigC in) zu we r den. Der Computer" 

7450 PRINT"zeichnet eine Karte deines Reiches." 
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7460 PRINT"Die Groesse des Turmes links oben zeigt" 

7470 PRINT"die Vert eidigungskraf t on. Wird der" 

7480 PRINT"Turm Kleiner, brauchst du mehr Soldaten" 

7430 PBINT'*Wenn das Pferd mit dem Landarbei ter" 

7500 PRINT"Coben rechts) die obere Grenze erreicht, 

7510 PBINT"wird das gauze Land genutzt. Wenn du" 

7520 PRINT"zuwenig Getreide ausgibst , sterben" 

7530 PRINT"deine Untertanen. Gibst du viel" 

7540 PRINT"Getreide aus, kommen neue Einwohner" 

7550 PRJNT"hinzu. Hohe Steuern bringen mehr Geld" 

7560 PRINT"ein, ver I angsamen aber das wi r tschaT t-" 

7570 PRINT'liche Hachstum." 

7580 COLOUR 5 

7590 PRINT STRINGM40. 217) s 

7600 FRINT"CDruecke <RETURN>, um zu beginnen)"; 

7610 COLOUR 16 

7620 INPUT ftS 

7630 CLS 

7640 RETURN 

7650 GOSUB 4540 

7660 GOSUB 1070 

7670 PRINT 

7680 PRINT"SPIELENDE. <RETURN> ruer neues Spiel "s 

7690 INPUT AS 

7700 GOTO 10 
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Ein Super-Sptelprograna in Maschinensprachei BftLLON 

Bei diesem Spiel geht es darun, zwei Mannchen mit emein 
Trompol in so zu bewegen , dap sie em drittes Mannchen dam it 
hochschleudern. Dabei sol I es moglichst viele der Bat Ions 
zui zerplatzen bringen. 

Es gewinnt dabei langsam immer mehr an Hohe und wird immer 
schneller. Fur jeden zerplatzten Luftballon gibt es 50 Punkte 
Die Steuerung der beiden unteren Mannchen geschieht mit den 
Pfeiltasten nach links bzw. nach rechts. 

Noch eiri Tip zum spielen; 

Versuchen Sie das Mannchen mogl ichst woagerecht fliegen zu 
lessen, da Sie so leichter die Luftballons holen honnen. 
Qazu lossen Sie das Mannchen am linken bzw. rechten Rand des 
Trampolins auf koiien . 



Das Spiel liegt u Speicherbere 

also in Graf ikspeicher CLGfi-Mod 
Der erste Bereich von 4800H bis 
das Spiel. Danach folgen Rout in 
Mannchen. Ab 5100H ist der Schr 
Er wird bei der Anfangsgraf lk 1 
Ab 5200H bis 55FFH ist die Tabe 
Zeichen angelegt, die lm Anschl 
abgedruckt sind. 

Bei 5600H I legt die Haupt-Progr 
abfrage fur die Bewegung. Die S 
wird jedoch nur der High-Score 
Anf angsgraf lk verzweigt . 



ich zwischen 4800H und 57FFH, 
us) des Co I our -Gen le . 

4BFFH enthalt die Grafik fur 
en zur Bewegung der Bat Ions und 
irtzug BALLON abgelegt. 
n das normale Bild kopiert. 
lie fur die def lnierboren 
up an das Hexlistmg noch einraal 

ammschleife mit der Tastatur- 
tartadresse ist 5790H . Dort 
mit Null belegt und sodann zur 



Zur besseren Or lent lerung in Programm. hier die als 
Variablen benutzten Speicherzel len und lhre Bedeutung: 

4288H - Position der beiden unteren Mannchen 

4289H - Flag fur deren Bewegung 

428AH/428BH - X-Position des Jumpers mit LSB/MSB 

428CH/428DH - Y-Position des Jumpers 

428EH - Zahler fur die Bewegung des Jumpers 

4230H/4291H - X-Richtung des Jumpers mit LSB/MSB 

4292H/4293H - Y-Richtung des Jumpers 

4294H/4235H - BuTTer fur X-Richtung 

4296H/'4297H - Buffer Tur Y-Richtung 

4298H - Zahler fur restliche Bat Ions C31...0J 

429AH/429BH - Score mit LSB/MSB 

429CH/4290H - High-Score mit LSB/MSB 

Auf der nachsten Seite finden Sie 2 Bi Idschirmausdrucke . 
Es folgt dann das Hexlisting, das Sie mit dem Maschinensprache- 
momtor in Basic Caus Colour-Genie Buch I/IIi, Oder mit dem 
neuen Maschinensprachemoni tor aus diesem Buch, eingeben honnen . 
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2 Bi Idschi rmausdruche: 



— *?* *?^ ^& ^ *& ^^ ^ 

- 5* *f* <£ <f* £* £* $ 



P <£ <$ <p 

<p <p <p <p r 

p <p g> <p : 



qr.n 




Ballon » Ballon * Ballon * Ballon * Ballon * Ballon * Ballon * 
Ballon * Ballon * Ballon * Ballon * Ballon * Ballon * Ballon * 
Ballon * Bat I on * Ballon * Ballon * Ballon * Ballon « Ballon * 
Ballon * Ballon * Ballon * Ballon * Ballon * Ballon *■ Ballon * 
Ballon * Ballon * Ballon * Ballon * Ballon * Ballon * Ballon * 
22 Ballon * Ballon * Ballon * Ballon * Ballon * Ballon * Ballon * 



Hexlisting Ballons: 



4800 53 43 4F 52 45 3E 20 30 

4808 30 30 30 30 20 20 41=1 55 

4810 4D 50 45 52 3E 20 36 20 

4818 20 48 49 2D 53 43 4F 52 

4820 45 3E 20 30 30 30 30 30 

4828 8C 8D 8E B7 B7 BY B7 B7 

4830 B7 B7 B7 B7 B7 B7 B7 B7 

4838 B7 67 B7 B7 B7 B7 B7 B7 

4840 B7 B7 B7 B7 B7 B7 B7 B7 

4848 B7 B7 B7 B7 8C 8D 8E 20 

4850 8C 80 8E 64 85 CO 84 85 

4858 CO 84 85 CO 84 85 CO 84 

4860 86 CO 84 85 CO 84 85 CO 

4868 84 85 CO 84 85 CO 84 85 

4870 CO 84 85 CO 8C 8D 8E 20 

4878 8C 3D 8E 94 95 CO 94 95 

4880 CO 94 95 CO 94 95 CO 94 

4888 95 CO 94 95 CO 94 95 CO 

4890 94 95 CO 94 95 CO 94 95 

4898 CO 94 95 CO 8C 8D 8E 20 

48A0 8C 8D 8E CO 84 85 CO 84 

48A8 85 CO 84 85 CO 84 85 CO 

48B0 84 85 CO 84 85 CO 84 85 

48B8 CO 84 85 CO 84 85 CO 84 

48C0 85 CO 84 85 8C 80 8E 20 

48C8 8C 8D 8E CO 94 95 CO 94 

48D0 95 CO 94 95 CO 94 95 CO 

48D8 94 95 CO 94 95 CO 94 95 

48E0 CO 94 95 CO 94 95 CO 94 

48E8 95 CO 94 95 8C 8D 8E 20 

48F0 8C 8D 8E 84 85 CO 84 85 

48F8 CO 84 85 CO 84 85 CO 84 

4900 85 CO 84 85 CO 84 85 CO 

4908 84 85 CO 84 85 CO 84 85 

4910 CO 84 85 CO 8C 8D 8E 20 

4918 8C 80 8E 94 95 CO 94 95 

4920 CO 94 95 CO 94 95 CO 94 

4928 95 CO 94 95 CO 94 95 CO 

4930 94 95 CO 94 95 CO 94 95 

4938 CO 94 95 CO 8C 8D 8E 20 

4940 8C 8D 8E 20 20 20 20 20 

4948 20 20 20 20 20 20 20 20 

4950 20 20 20 20 20 20 20 20 

4958 20 20 20 20 20 20 20 20 

4960 20 20 20 20 8C 8D 8E 20 

4968 8C 8D 8E 20 20 20 20 20 

4970 20 20 20 20 20 20 20 20 

4978 20 20 20 20 20 20 20 20 

4980 20 20 20 20 20 20 20 20 

4988 20 20 20 20 8C 80 8E 20 



4990 8C 8D 8E 20 20 20 20 20 

4998 20 20 20 20 20 20 20 20 

49A0 20 20 20 20 20 20 20 20 

49A8 20 20 20 20 20 20 20 20 

49B0 20 20 20 20 8C 8D SE 20 

49B8 8C 8D 8E 20 20 20 20 20 

49C0 20 20 20 20 20 20 20 20 

49C8 20 20 20 20 20 20 20 20 

4900 20 20 20 20 20 20 20 20 

49D8 20 20 20 20 8C 8D 3E 20 

49E0 8C 80 8E 20 20 20 20 20 

49E8 20 20 20 20 20 20 20 20 

49F0 20 20 20 20 20 20 20 20 

49F8 20 20 20 20 20 20 20 20 

4A00 20 20 20 20 8C 8D 8E 20 

4A08 8C 8D 8E 20 20 20 20 20 

4A10 20 20 20 20 20 20 20 20 

4A18 20 20 20 20 20 20 20 20 

4A20 20 20 20 20 20 20 20 20 

4A28 20 20 20 20 8C 8D 8E 20 

4A30 8C 8D 8E 20 20 20 20 20 

4A38 20 20 20 20 20 20 20 20 

4A40 20 20 20 20 20 20 20 20 

4A48 20 20 20 20 20 20 20 20 

4AS0 20 20 20 20 8C 80 8E 20 

4A58 8C 8D 8E 20 20 20 20 20 

4A60 20 20 20 20 20 20 20 20 

4A68 20 20 20 20 20 20 20 20 

4A70 20 20 20 20 20 20 20 20 

4A78 20 20 20 20 8C 8D 8E 20 

4ASO 8C 8D 8E 20 20 20 20 20 

4A88 20 20 20 20 20 20 20 20 

4A80 20 20 20 20 20 20 20 20 

4A98 20 20 20 20 20 20 20 20 

4AAO 20 20 20 20 8C 8D 8E 20 

4AA8 8C 8D 8£ 20 20 20 20 20 

4AB0 20 20 20 20 20 20 20 20 

4AB8 20 20 20 20 20 20 20 20 

4AC0 20 20 20 20 20 20 20 20 

4AC8 20 20 20 20 8C 8D 8E 20 

4AD0 8C 8D 8E 20 20 20 20 20 

4ftD8 20 20 20 20 20 20 20 20 

4fiE0 20 20 20 20 20 20 20 20 

4AE8 20 20 20 20 20 20 20 20 

4AF0 20 20 20 20 8C 8D 8E 20 

4AF8 8C 8D 8E 20 20 20 20 20 

4BO0 20 20 20 20 20 20 20 20 

4B08 20 20 20 20 20 20 20 20 

4B10 20 20 20 20 20 20 20 20 

4B18 20 20 20 20 8C 8D 8E 20 

4B20 8C 8D 8E 20 20 20 20 20 

4B28 20 20 20 20 20 20 20 20 

4B30 20 20 20 20 20 20 20 20 



at 



>4B38 20 20 20 20 20 20 20 20 

4B40 20 20 20 20 8C 8D 8E 20 

4B48 8C 8D 8E 20 20 20 20 20 

4B50 20 20 20 20 20 20 20 20 

4658 20 20 20 20 20 20 20 20 

4B60 20 20 20 20 20 20 20 20 

4B68 20 20 20 20 8C 8D 8E 20 

4B70 8C 80 8E 20 20 20 20 20 

4B78 20 20 20 20 20 20 20 20 

4B80 20 20 20 20 20 20 20 20 

4688 20 20 20 20 20 20 20 20 

4B80 20 20 20 20 8C 8D 8E 20 

4B98 8C 8D 8E 20 20 20 20 20 

4BA0 20 20 20 20 20 20 20 20 

4BFI8 20 20 20 20 20 20 20 20 

48B0 20 20 20 20 20 20 20 20 

4BB8 20 20 20 20 8C 8D 8E 20 

4BC0 8F 8F 8F 8F 8F 8F 8F 8F 

4BC8 8F 8F 8F 8F 8F 8F SF 8F 

4BD0 8F 8F 8F 8F 8F 8F 8F 8F 

4BD8 8F 8F 8F 8F 8F 8F 8F 8F 

4BE0 8F 8F 8F 8F 8F 8F 8F 20 

4BE8 20 20 20 20 20 20 20 20 

4BF0 20 20 20 20 20 20 20 20 

4BF8 20 20 20 20 20 20 20 20 

4C00 21 00 48 11 00 44 01 OO 

4C08 04 ED BO 21 00 FO 06 07 

4C10 36 02 23 10 FB 06 07 36 

4C18 04 23 10 FB 06 OB 36 06 

4C20 23 10 FB 06 Ofl 36 02 23 

4C28 10 FB 06 05 36 04 23 10 

4C30 FB 21 50 FO 06 02 3E 01 

4C38 C5 06 03 77 23 10 FC 06 

4C40 21 36 04 23 10 FB 06 04 

4C48 77 23 10 FC CI 10 E9 06 

4C50 02 C5 06 03 77 23 10 FC 

4C58 06 21 36 06 23 10 FB 06 

4C60 04 77 23 10 FC CI 10 E9 

4C68 06 02 C5 06 03 77 23 10 

4C70 FC 06 21 36 02 23 10 FB 

4C78 06 04 77 23 10 FC CI 10 

4C80 E9 06 10 C5 06 03 77 23 

4C88 10 FC 06 21 36 03 23 10 

4C90 FB 06 04 77 23 10 FC CI 

4C98 10 E9 3E 21 32 98 42 00 

4CFI0 06 27 36 09 23 10 FB C9 

4Cft8 3fl 88 42 11 70 47 6F 26 

4CB0 00 IS 3ft 89 42 E6 01 4F 

4CB8 07 07 81 C6 ftO 06 05 77 

4CC0 23 3C 10 FB 11 23 00 19 

4CC8 C6 OB 06 05 77 23 3C 10 

4CD0 FB 11 D3 AB 19 36 06 23 

4CD8 06 03 36 03 23 10 FB 36 

4CE0 06 11 24 00 19 36 OC 23 

4CE8 06 03 36 Oft 23 10 FB 36 
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4CF0 OC C3 3ft 8D 42 6F 26 00 

4CF8 29 29 29 E5 29 29 Dl 19 

4D00 3A 8B 42 5F 16 44 19 3fi 

4O08 8E 42 3C 32 8E 42 OF OF 

4D10 OF E6 03 CS 80 n 11 28 

4D18 00 19 C6 lO 77 01 D8 AB 

4D20 09 36 06 19 36 OE C9 00 

4D28 3PI 88 42 C6 70 6F 26 47 

4D30 06 05 36 20 23 10 FB 11 

4D38 23 00 19 06 05 36 20 23 

4D40 10 FB C3 OO 7E 23 F5 06 

4D48 20 7E E6 Fl 81 12 13 23 

4D50 10 F7 Fl E6 Fl 81 12 C9 

4D58 7E 2B F5 06 20 7E E6 Fl 

4D60 81 12 IB 2B 10 F7 Fl E6 

4D68 Fl 81 12 C9 3fl 8F 42 3C 

4D70 32 8F 42 E6 07 CO 3ft BF 

4D78 42 E6 18 OF OF C6 04 4F 

4D80 21 S3 44 11 53 44 CD 44 

4D88 40 21 7B 44 11 7B 44 CD 

4D90 44 4D 21 C3 44 1 1 C3 44 

4D98 CD 58 4D 21 EB 44 11 EB 

4DfiO 44 CD 58 W 21 F3 44 11 

4DA8 F3 44 CD 44 4D 21 IB 45 

4DB0 11 IB 45 CD 44 4D C3 00 

4DB8 2A 8A 42. ED 5B 90 42 19 

4DC0 22 94 42 2FI 8C 42 ED 5B 

4DC8 92 42 19 22 96 42 3ft 97 

4DD0 42 6F 26 00 29 29 29 E5 

40D8 29 29 Dl 19 3A 95 42 5F 

4DEO 16 44 19 CD EE 4D 11 28 

4DE8 OO 19 CD EE 4D C9 7E FE 

4DF0 8C 38 33 FE 8F 30 OF 2ft 

4DF8 90 42 7D 2F 6F 7C 2F 67 

4E00 22 90 42 Fl C9 00 CA 30 

4E08 4F FE 9C 38 19 FE Bl 28 

4E10 4F FE B2 28 55 FE B3 28 

4E18 4C FE B6 28 43 FE B7 28 

4E20 49 FE B8 28 40 C9 FE 84 

4E28 D8 FE 90 38 03 FE 94 D8 

4E30 E6 11 B7 28 14 FE 01 20 

4E38 03 2B 18 OD FE lO 20 06 

4E40 11 D8 FF 19 18 03 2B 18 

4E48 F7 7E FE 8E 28 43 23 7E 

4E50 FE 8C 28 52 2B 3E CO 77 

4E58 23 77 11 27 00 19 13 2C 

4E60 11 F8 FF 18 08 11 08 00 

4E68 18 03 11 00 00 2A 90 42 

4E70 7C FE 01 28 05 FE FE 28 

4E78 01 19 22 90 42 2A 92 42 

4E80 11 00 00 EB ED 52 22 92 

4E88 42 C3 80 4F 77 23 77 18 

4E90 28 23 3E CO 77 11 28 00 
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4E98 19 77 11 F8 FF 19 77 11 

4EA0 28 00 19 77 18 13 3£ CO 

4EA8 2B 77 11 23 00 19 77 tl 

4EB0 BF FF 19 77 11 28 00 19 

4EB8 77 11 00 AC 19 7E OE OA 

4EC0 FE 02 28 08 OE 19 FE 06 

4EC8 28 02 OE 32 06 00 2A 9A 

4ED0 42 09 22 9A 42 E5 CD OC 

4ED8 4F El ED 5B 9C 42 DF 38 

4EE0 03 22 9C 42 2A 9C 42 11 

4EE8 23 44 CD OF 4F 3E 08 03 

4EF0 F8 3E 10 D3 F9 3E OD D3 

4EF8 F8 3E 09 D3 F9 C3 20 50 

4F00 3E 30 3C 03 38 FC 3D ED 

4F08 42 12 13 C9 11 07 44 01 

4F10 FO D8 CD 00 4F 01 18 FC 

4F18 CD 00 4F 01 9C FF CD 00 

4F20 4F 01 F6 FF CD 00 4F 01 

4F28 FF FF CD 00 4F C9 00 00 

4F30 26 47 3A 8B 42 C6 98 6F 

4F38 36 9C 23 36 9D 23 36 9E 

4F40 11 FE AB 13 36 OE 23 36 

4F48 OE 23 36 06 3E 09 D3 F8 

4F50 3E OF D3 F9 06 10 3E 03 

4F58 D3 F8 78 03 F9 C5 78 E6 

4F60 07 3C 47 CD 60 00 CI 10 

4F68 ED 3E 09 D3 F8 AF D3 F9 

4F70 01 OO 00 CD 60 00 C3 34 

4F78 50 00 00 OO 00 00 00 00 

4F80 3E OA D3 F8 3E 10 D3 F9 

4F88 3E 08 D3 F8 3E 00 03 F9 

4F90 3E OD D3 F8 3E 09 D3 F9 

4F98 3E 05 D3 F8 3£ OF D3 F9 

4FA0 CD FO 14 3A AA 40 E6 03 

4FA8 3D 3D 5F 16 00 FE 80 38 

4FB0 02 16 FF 2A 90 42 19 22 

4FB8 90 42 Fl C9 CD 00 4C 21 

4FC0 03 00 22 88 42 21 00 06 

4FC8 22 8A 42 21 00 08 22 8C 

4FD0 42 21 20 00 22 90 42 21 

4FD8 OO 00 22 92 42 C9 00 00 

4FE0 21 50 FO 06 02 C5 23 23 

4FE8 23 06 21 36 04 23 10 FB 

4FFO 23 23 23 23 CI 10 EE 06 

4FF8 02 C5 06 21 23 23 23 36 

5000 06 23 10 FB 23 23 23 23 

5008 CI 10 EE 06 02 C5 06 21 

5010 23 23 23 36 02 23 10 FB 

5018 23 23 23 23 CI 10 EE C9 

5020 2fl 81 56 7C B7 28 04 2B 

5028 22 81 56 Fl 3A 98 42 3D 

5030 32 98 42 C9 3A 16 48 3D 

5038 32 16 48 FE 30 28 05 CD 

5040 BC 4F Fl C9 Fl Fl C3 00 

5048 57 00 00 00 00 00 00 00 

5050 00 00 00 00 00 00 00 00 

5058 00 00 00 00 00 00 00 00 

5060 00 00 00 00 00 00 00 00 

5068 00 00 00 00 00 00 00 00 

5070 00 00 00 00 00 00 00 00 

5078 00 00 00 00 00 00 00 00 



ST 
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5080 O0 00 00 00 00 00 00 00 

5088 00 00 00 00 00 00 00 00 

5090 00 00 00 OO 00 00 00 00 

5098 00 00 00 OO 00 00 00 00 

50PiO OO 00 00 OO 00 00 00 00 

50A8 00 OO 00 00 00 00 00 00 

50B0 OO 00 00 OO 00 00 00 00 

50B8 00 OO 00 00 00 00 00 00 

50C0 00 00 00 OO 00 00 00 00 

50C8 00 00 00 00 00 00 00 00 

5000 00 00 00 OO 00 00 00 00 

5008 00 OO 00 00 00 00 00 00 

50E0 OO 00 00 OO 00 00 00 00 

50E8 00 00 00 00 00 00 00 00 

50F0 00 00 00 00 00 00 00 00 

50F8 00 00 00 00 00 00 00 00 

5100 8C 80 8E 20 SF 8F 8F 20 

5108 20 20 8F 8F 20 20 8F 20 

5110 20 20 20 SF 20 20 20 20 

5118 20 8F 8F 20 20 8F 20 20 

5120 SF 20 20 20 8C 8D 8E 20 

5128 8C 8D 8E 20 8F 20 20 8F 

5130 20 8F 20 20 8F 20 8F 20 

5138 20 20 20 8F 20 20 20 20 

5140 8F 20 20 8F 20 SF 8F 20 

5148 8F 20 20 20 8C 80 8E 20 

5150 8C 8D 8E 20 8F 8F 8F 20 

5158 20 8F 8F 8F 8F 20 8F 20 

5160 20 20 20 8F 20 20 20 20 

5168 8F 20 20 8F 20 8F 20 8F 

5170 8F 20 20 20 8C 8D 8E 20 

5178 8C 8D 8E 20 8F 20 20 8F 

5180 20 8F 20 20 8F 20 8F 20 

51 88 20 20 20 8F 20 20 20 20 

5190 8F 20 20 8F 20 8F 20 20 

5198 8F 20 20 20 8C 8D 8E 20 

51A0 8C 8D 8E 20 8F 8F 8F 20 

51A8 20 8F 20 20 8F 20 8F 8F 

51B0 8F 8F 20 8F 8F 8F 8F 20 

51B8 20 8F 8F 20 20 8F 20 20 

51C0 8F 20 20 20 8C 8D 8E 20 

51C8 8C 8D 8E 20 20 20 20 20 

51 DO 20 20 20 20 20 20 20 20 

51D8 20 20 20 20 20 20 20 20 

51E0 20 20 20 20 20 20 20 20 

51E8 20 20 20 20 8C 8D 8E 20 

51F0 20 20 20 20 20 20 20 20 

51 F8 20 20 20 20 20 20 20 20 

5200 3C 7A 73 7E 3C 19 3D 7F 

^5.208 3C 7E 7E 7E BD 99 BD FF 

5210 3C OE OE 7E BC 98 BC FE 

5218 3C 7E 7E 7E 3C 18 3C 7E 

5220 03 OF IF 31 27 27 27 U 

5228 CO FO F8 8C 3C 9C CC 18 

5230 03 OF IF 21 33 33 33 13 

5238 CO FO F8 8C 3C 3C 3C 88 

5240 03 OF IF 3F 3F 3F 3F IF 

5248 CO FO F8 84 CC CC CC C8 

5250 03 OF IF 30 2T 31 3C 11 

52S8 CO FO F8 FC FC FC FC F8 

5260 07 07 03 03 03 03 03 03 



5268 FF FF 00 00 00 00 00 0O 

5270 EO EO CO CO CO CO CO CO 

5278 £7 E7 00 7E 7E 00 E7 E7 

5280 FE BO 8C 3E 76 67 60 EO 

5288 FE 00 3C 7E 66 E7 00 00 

5290 7F OD 31 7D 6E E6 06 07 

5298 FF BD 81 BD 7E 66 66 E7 

52A0 OF 03 06 OF 00 00 00 OO 

52A8 FO CO 00 00 00 00 00 00 

52B0 OF 03 01 03 00 00 00 OO 

52B8 FO CO 80 CO 00 00 00 00 

52C0 OF 03 00 00 00 00 00 00 

52C8 FO CO 60 FO 00 00 00 00 

52D0 OF 03 01 03 00 00 00 OO 

52D8 FO CO 80 CO 00 00 00 00 

52E0 00 00 00 00 81 83 FF FF 

52E8 00 OO 00 00 7C 7F 03 7F 

52F0 00 00 00 08 3C 76 F6 BC 

52F8 00 00 00 00 00 00 00 00 

5300 OO 3C 7B 7E 3C 18 3C 76 

5308 00 00 00 00 00 00 00 00 

5310 00 00 00 00 00 00 00 00 

5318 00 00 00 00 00 00 00 00 

5320 00 3C DE 7E 3C 18 3C 6E 

5328 04 78 EC FC 78 30 78 DC 

5330 00 00 00 00 00 00 00 00 

5338 00 00 00 00 00 00 00 00 

5340 00 00 00 00 00 00 00 00 

5348 20 IE 37 3F IE OC IE 3B 

5350 00 00 00 00 00 00 00 00 

5358 00 OO 00 00 00 00 00 00 

5360 00 00 00 00 00 00 00 OO 

5368 00 00 00 00 00 00 00 00 

5370 00 00 00 00 00 00 00 OO 

5378 00 00 00 00 00 00 00 00 

5380 7B 7D 7C 3E 36 36 36 3F 

5388 FO OF 00 00 00 00 00 00 

5390 00 00 FF 00 00 00 00 00 

5398 OF FO 00 00 00 00 00 00 

53R0 DE BE 3E 7C 6C 6C 6C FC 

53A8 EF F6 78 30 59 6F 66 70 

53B0 FF 00 OO 00 00 00 00 00 

53B8 FF 00 00 00 00 00 00 00 

53C0 FF 00 00 00 00 00 00 00 

53C8 F7 6F IE OC 9fl F6 66 OE 

53D0 00 00 00 00 00 00 00 00 

53D8 00 00 00 00 00 00 00 00 

53E0 00 00 00 00 00 00 00 00 

53E8 00 00 00 00 00 00 00 00 

53F0 00 00 00 00 00 00 00 00 

53F8 00 00 00 00 00 00 00 00 

5400 00 00 00 00 00 00 00 00 

5408 00 00 00 00 00 00 00 00 

5410 00 00 00 00 00 00 00 00 

5418 00 00 00 00 00 00 00 00 

5420 00 00 00 00 00 00 00 00 

5428 00 00 00 00 00 00 00 OO 

5430 00 00 00 00 00 00 00 00 

5438 00 00 00 00 00 00 00 OO 

5440 00 00 00 00 00 00 00 00 

5448 00 00 00 00 00 00 00 00 
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5450 00 00 00 00 00 00 00 00 

5458 00 00 00 00 0O 00 00 00 

5460 OO 00 00 00 00 00 00 00 

5468 00 00 00 00 00 00 00 00 

5470 00 00 00 OO 00 00 00 00 

5478 00 00 00 00 00 00 00 00 

S480 00 00 00 OO 00 00 00 00 

5488 00 00 00 00 00 00 00 00 

5490 00 00 00 OO 00 00 00 00 

5498 00 00 00 00 00 00 00 00 

54A0 00 00 00 00 00 00 00 00 

54A8 00 00 00 00 00 00 00 00 

54B0 00 00 00 00 00 00 00 00 

54B8 00 00 00 00 00 00 00 00 

54C0 00 00 00 00 00 00 00 00 

54C8 00 00 00 00 00 00 00 00 

54D0 00 OO 00 00 00 00 00 00 

54D8 00 00 OO 00 00 00 00 00 

54E0 00 00 00 00 00 00 00 00 

54E8 00 00 OO 00 00 00 00 00 

54F0 00 OO 00 00 00 00 00 00 

54F8 00 00 00 00 00 00 00 00 

5500 00 00 00 00 00 00 00 00 

5508 00 00 00 00 00 00 00 00 

5510 00 00 00 00 00 00 00 00 

5518 00 00 00 00 00 00 00 00 

5520 00 00 OO 00 00 00 00 00 

5528 00 00 00 00 00 00 00 00 

5530 00 00 00 00 00 00 00 00 

5538 00 00 00 00 00 00 00 00 

5540 00 00 00 00 00 00 00 00 

S548 00 00 00 00 00 00 00 00 

5550 00 00 00 00 00 00 00 00 

5558 00 00 00 00 00 00 00 00 

5560 00 00 00 00 00 00 00 00 

5568 00 00 00 00 00 00 00 00 

5570 00 00 00 00 00 00 00 00 

5578 00 00 00 00 00 00 00 00 

5580 00 00 00 OO 00 00 00 00 

5588 00 00 00 00 00 00 00 00 

5590 00 00 00 00 00 00 00 00 

5598 00 00 00 00 00 00 00 00 

55PI0 00 00 00 OO 00 00 00 00 

55P8 OO 00 00 00 00 00 00 00 

55B0 00 00 00 00 00 00 00 00 

S5B8 OO 00 00 00 00 00 00 00 

55C0 00 00 00 OO 00 00 00 00 

55C8 OO 00 00 00 00 00 00 00 

55D0 00 00 00 OO 00 00 00 00 

55D8 00 00 00 00 00 00 00 00 

55E0 00 00 00 OO 00 00 00 00 

55E8 00 00 00 00 00 00 00 00 

55F0 00 00 00 OO 00 00 00 00 

55F8 00 00 00 00 00 00 00 00 

5600 CD 28 4D ED 4B 88 42 3R 

5608 40 F8 CB 6F 28 01 OD CB 

5610 77 28 01 OC 79 FE 03 30 

5618 01 3C FE 20 38 01 30 4F 

5620 3fl 88 42 B9 28 01 04 ED 

5628 43 88 HZ CD (=18 4C 3A 8D 

5630 42 6F 26 00 29 29 29 E5 

5638 29 29 Dl 19 31=1 8B 42 5F 



5640 16 44 19 36 CO 11 28 00 

5648 19 36 CO CD 6C 4D CD B8 

5650 4D 2A 90 42 ED 5B 8fl 42 

5658 19 22 8PI 42 2A 92 42 ED 

5660 5B 8C 42 19 22 8C 42 2Pl 

5668 92 42 7C FE 01 28 01 23 

56T0 22 92 42 CD EO 4F CD F2 

5678 4C 00 00 00 00 00 00 00 

5680 01 00 06 CD 60 00 3A 98 

5688 42 B7 20 03 CD BC 4F 3A 

5690 40 F8 FE 06 C2 00 56 C3 

5698 00 57 00 00 00 00 00 00 

56A0 00 00 00 00 00 00 00 00 

56A8 00 00 00 00 00 00 00 OO 

56B0 00 00 00 00 00 00 00 00 

56B8 00 00 00 00 00 00 00 00 

56C0 00 00 00 00 00 00 00 00 

56C8 00 00 00 00 00 00 00 OO 

56D0 00 00 00 00 00 00 00 00 

56D8 00 00 00 00 00 00 00 00 

56E0 00 00 00 00 00 00 00 00 

56E8 00 00 00 00 00 00 00 00 

56F0 00 00 00 00 00 00 00 00 

56F8 00 00 00 00 00 00 00 00 

5700 CD C9 01 21 03 00 22 88 

5708 42 21 00 06 22 8FI 42 21 

5710 00 08 22 8C 42 21 30 00 

5718 22 90 42 21 00 00 22 92 

5720 42 21 00 00 22 9fl 42 00 

5728 00 00 3E 07 D3 F8 3E Fl 

5730 D3 F9 3E 08 D3 F8 AF D3 

5738 F9 3E 09 D3 F8 AF 03 F9 

5740 3E Oft D3 F8 AF D3 F9 21 

5748 00 06 22 81 56 21 00 52 

5750 11 00 F4 01 00 04 ED BO 

5758 3E 00 CD BO 3F 3E 36 32 

5760 16 48 CD 00 4C 21 00 51 

5768 11 80 46 01 FO 00 ED BO 

5770 2A 98 42 CD OC 4F 2A 9fl 

5778 42 11 23 44 CD OF 4F CD 

5780 49 00 CD 00 4C C3 00 56 

5788 00 00 00 00 00 OO 00 00 

5790 21 OO 00 22 98 42 C3 00 

5798 57 00 00 00 00 00 00 00 

57PI0 00 OO OO OO OO 00 00 00 

57A8 00 00 00 00 00 00 00 00 

57B0 00 00 00 00 00 00 00 00 

57B8 00 00 00 00 00 00 00 00 

57C0 00 00 00 00 00 00 00 00 

57C8 00 00 00 00 00 00 00 OO 

57D0 00 00 00 00 00 00 00 00 

57D8 00 00 00 00 00 00 00 00 

57E0 00 00 00 00 00 00 00 00 

57E8 00 00 00 00 00 00 00 OO 

57F0 00 00 00 00 00 00 00 OO 

57F8 00 00 00 00 00 00 00 OO 
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Der Zeichensotz des Prograiis BALLON 



CHRSC128) CHR$C129) CHR*U30> CHR$C131) CHRK 132) CHR$Ci33) 









CHRSC134:) CHRSC1351 CHRStl36) CHRSC137) CHRJC138) CHRK139) 









CHRK 140) CHRSC141) CHRSC142) CHRSU43) CHRSU44) CHRSC145) 



in h m k 




CHR$C146> CHR$C147} CHRJC148) CHRSC1495 CHR*(150) CHR$C151) 





*m p 



CHR*C152) CHR*tl53) CHR*C154) CHRSC1SS) CHRSC156) CHRSC157) 



Eiii :iii!l r 



CHRK15S) CHRSC159) CHRSC160) CHR»<161) CHRSC162) CHRK163) 
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CHRSC164) CHR*C165) CHRS( 166} CHRSC1671 CHR4C168J CHRSC169) 






CHR*<170) CHR*tt71) CHR4C172] CHR*Ct731 CHR*C174J CHR*C1755 



CHRSC1763 CHR*C177) CHRSC178) CHRSC179) CHRIC180) CHRSC181) 






CHR*(182) CHRK183) CHRSC184) CHRSC185) CHR*C186) CHRSC187) 




CHRK188) CHRSC189) CHRtClSO) CHRK191) CHRSC192) CHRSC193) 



Ein leistungsfahiger Maschinensprache-Moni tor 

Der Monitor, den Sie auf den folgenden Seiten finden, bietet 

nicht nur viele leistungsstarke Befehle, er hat noch einen 

anderen gropen Vorteil: Er ist so optimiert programmiert . 

dap er nur 4K Byte lang ist. 

Danut ist er schnell geladen und nimmt nur wenig Speicher- 

platz in Anspruch. 

Ferner ist der Monitor voll relozierbar. 

Wenn Sie die floglichkeit hoben , 2532-Eproms zu programmieren . 

konnen Sie diesen Moriitor sogar lm EPROM Lauren Lassen i ' 

Dies ist besonders interessant fur Dishet tenbenut zer . die ja in 

der DOS-Cartridge einen Epromsteckplat z (EOOOH-EFFFH ) frei 

haben. 

In folgenderi finden Sie zwei Hex-L ist ings : Das erste ist die 
Diskettenversion des Monitors ( A800H-B7FFH) , das zweite die 
Kassettenversion C7000H-7FFFH ) . 
Die Stortodressen smd fiBOOH bzw. 7000H . 

Die Befehle des Monitors} 

Seder BefeM des Monitors hot folgervdes Format; 
Xaaaa< bbbt>< ccec>> RETURN, wobei X einer der im folgenderi 
beschr lebenen Bef ehlskurzel und aaaa bis cccc He^adezimaLzahlen 
s ind . 

Flaaaa Ascii-Edlt 

Die Pfeil tasten bewegen den Cursor, 
<BREfiK> kehrt zur Komroandoei ngabe zuruck, 
<CLERR> schaltet um zum Hey-Edit. 



Da 



Drive-Select (nur Dishuersion 1 ') 

Das Laufwerk a CO-3) wird fur den nachf olgenden 

Zugriff selektiert. 



E E-<it Basic 

Faaaa bb Find Bytes 

Sucht ab ftdresse aaaa nach maximal 4 Bytes bb . 
Werden keine Bytes angegeben. so wird mit den zutetzt 
angegebenen Bytes ab der neuen Fldresse wel t ergesucht , 
wird auch die Fldresse weggelossen, so wird mit den 
olten Bytes ob der alten Adresse+1 welter gesucht Wird 
die Bytefolge lin Speicher gefimden, so werden Hex-Dump 
und Disassembler auf die gefundetie fldresse gesetzt. 

Gaaaa Go Address 

Das Programm, das bei fldresse aaaa beginnt, wird als 
Urit erprogramm aufgerufen, 50da(J rait einera RET-Befeht 
in den Monitor zuruckgekehr t werden kann. Die Register 
werden so ubernommen. wie sie in der Anzeige stehen, 
hinterher werden die neuen Inhalte angezeigt. 
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Haaaa He\-Edit 

Pfeiltasten bewegen den Cursor, 
<BREAK> kehrt zur Bef ehl seingabe zuruck, 
<CLEAR> schaltet um auf Ascii-Edit, 

<;>, <-> schalten eine Seite C64 Bytes) vor/zuruck 
<F1> larhiert Cursorstelle 

<F2> berechnet relatives Offset von der Cursorpos l t ion 
zur letzten mi t <F1> abgespeicherten Adresse, 
setzt dieses in die ftdresse <F1> ein. 

la Inhat tsverzeichnis Cnur Diskversion ' ) 

Das Inhel tsverzeichnis der Diskette in Laufwerk a wird 
angezeigt . 

L Load 

Ein Progralli von Kasset te/Disket te laden. 
Startadresse, Endadresse und E insprungadresse werden 
angezeigt . 

Maaaa bbbb cccc 

Move memory 

Verschiebt den Speicherbereich von ftdresse aaaa bis 
ftdresse bbbb auf fldresse cccc. Die Bereiche durfen 
sich auch uberlappen. 

Oaaaa bbbb cccc dddd eeee 
Offset berechnen 

Im Speicherbereich von aaaa bis bbbb werden alle 
Adressen. die zwischen cccc und dddd liegen, in Fldres- 
sen ab eeee umgeandert CRelozierfunkt ion) . 

Paaaa bbbb 

Printerlisting 

Der Speicherbereich von Adresse aaaa bis bbbb wird 

disassembl lert ouf den Drucker ausgegeben. 

Qaaaa Disassembler 

Ab fldresse aaaa werden 11 Zeilen disassembl lert 
ausgegeben. Mit dem Aufwarts-ZAbwartspfei I konnen Sie 
einen Befehl ruckwar ts/vorwarts gehen. mit <->,<*> 11 
Befehle (1 Seite). 

Rsss aaaa cc 

Read sectors Cnur Disket ten version i ) 

Von der mit D selektierten Diskette werden cc Sektoren 

ab Sektor sss in den Speicher ab fldresse aaaa geladen. 

Saaaa bbbb cccc 

Save memory 

Schreibt den Speicherbereich von aaaa bis bbbb mit der 

Einsprungadresse cccc auf Kasset te/Disket te. 



V View file 

Ein Programm auf Kasset te/Disket te wird auf seine 
Ladeadressen hin Uberpriift. Auf diese Art und Weise 
konnen Sie feststelLen. nohin ein Programm geLaden 
wiirde, menu es geladsn wiirde. 

Wsss aaaa cc 

Write sectors Cnur Disket tenversion ij 

Schreibt den Speicherbereich ab fldresse aaaa auf die 
moment an selektierte Diskette ab Sektor sss . cc 
Sektoren werden beschrieben. 

Xaaaa bbbb 

Xecute calculation 

Berechnet Sumrae und Differen2 von aaaa und bbbb. 

Zaaaa bbbb cc 

Zero memory 

Flil It den Speicherbereich zwischen aaaa und bbbb mit 

dem Byte cc , 



Die Hexlistings der beiden Monitor versionen (Disk- und Tapever- 
sion) beginnen auf der nachsteri Seite: 
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A800 C3 89 B3 F5 F5 OF OF OF y„t,j,<*t **'S0V*9 

A808 OF CD 26 A8 Fl CD 26 A8 

A810 Fl C9 FE AO 38 06 F5 3E 

A818 30 12 13 Fl F5 CD 03 AS 

A820 3E 48 12 13 Fl C9 E6 OF 

A828 C6 90 27 CE 40 27 12 13 

A830 C9 F5 7C FE AO 38 05 3E 

A838 30 12 13 7C CD 03 A8 7D 

A840 18 DB 7C CD 03 A8 7D C3 

A848 03 A8 C5 F5 2A 00 42 7E 

A850 FE ED 20 01 23 23 4E 23 

A858 46 C5 El CD 31 A8 CD EE 

A860 B6 Fl CI C9 F5 3E 28 12 

A868 13 Fl C9 FS 3E 28 18 F7 

A870 F5 3E 2C 18 F2 F5 3E 41 

A878 18 ED CD 75 A8 18 Fl CD 

A880 70 A8 18 Fl CD 87 A8 F5 

A888 3E 20 18 DB F5 3E 2B 18 

A890 D6 3E 02 18 02 3E 03 C3 

A898 F4 AS E6 38 OF 4F 06 00 

A8A0 C9 C5 E5 F5 E6 07 4F 06 

A8A8 00 21 68 AE 09 7E FE 4D 

A8B0 28 06 12 13 Fl El CI C9 

A8B8 3A 05 42 B7 20 OD CD 64 

A8C0 A8 CD 91 A8 CD 6B A8 Fl 

A8C8 El CI C9 C6 03 CD 64 A8 

A8D0 CD F4 AS CD 8C A8 2A 00 

A8D8 42 23 7E CO 12 A8 CD 6B 

A8E0 A8 Fl El CI F5 3A 06 42 

A8E8 B7 28 07 AF 32 06 42 04 

A8F0 04 23 Fl C9 C5 E5 FS E6 

A8F8 07 07 4F 06 OO 21 70 AE 

A900 09 7E 12 13 23 7E 12 13 

A908 FE 4C 28 04 Fl El CI C9 

A910 3A 05 42 B7 28 F6 IB IB 

A918 3E 49 12 13 3A 05 42 C6 

A920 57 12 13 Fl El Ct F5 3A 

A328 06 42 B7 28 05 AF 32 06 

A930 42 04 Fl C9 C5 01 04 00 

A938 ED BO CD 87 A8 C 1 C9 F5 

A940 E6 38 OF OF OF CD Al A8 

A948 Fl C9 C5 F5 2A 00 42 23 

A950 7E 4F 06 00 FE 80 38 02 

A358 06 FF 23 09 CO 31 A8 Fl 

A960 CI C9 F5 E6 30 OF OF OF 

A968 OF CD F4 A8 Fl C9 CD 62 

A970 A9 F5 IB 1A FE 50 20 07 

A978 IB CD 75 A8 3E 46 12 13 

A980 Fl C9 C5 CD 9A A8 CB 09 

A988 21 7C AE 09 7E 12 23 13 

A990 7E FE 20 28 02 12 13 CI 
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H,r1,tit*l «f*. »■?■*¥ Ag9S C g Dfe 20 CD g 2 ^g jg 70 

A9A0 AS C3 4ft A9 F5 E6 07 4F 

A9A8 OC Fl OD CA 7E AA OD CA 

A9B0 56 Aft OD 28 51 OD 28 3A 

A9B8 OD 28 32 OD 28 24 OD 28 

A9C0 OC 21 DS AE CD 9A A8 03 

A9C8 06 01 C3 34 A9 E5 21 38 

A9D0 AF 06 02 CD 34 A9 El CD 

A9D8 3F A9 CD 70 AS 23 7E C3 

A9E0 12 A8 21 80 AF CD 34 A3 

A9E8 06 01 C3 3F A9 21 7C AF 

A9F0 18 F3 CB 5F 20 05 21 7C 

A9F8 AF IS 03 21 80 AF CD 34 

AAOO A9 06 01 C3 62 A9 21 38 

AA08 OF CD 34 A9 FE 20 30 18 

AAIO CB 5F 28 OE CD 7A A8 CO 

AA18 64 A8 06 01 CD 62 89 C3 

AA20 6B A8 CD 17 AA C3 7F A8 

AA28 06 03 CB 5F 28 18 FE 30 

AA30 38 05 CD 7A A8 18 06 CD 

ftft38 91 A8 CD 70 A8 CD 64 A8 

AA40 CD 4A A8 C3 6B A8 06 03 

AA48 CD 3D AA CD 70 A8 FE 30 

AA50 D2 75 AS C3 91 AS CB 5F 

AA58 28 13 21 8C AE CD 34 A9 

AA60 06 01 F5 CD 91 A8 Fl CD 

AA68 70 A8 C3 62 A9 21 38 AF 

AA70 CD 34 A9 06 03 CD 62 A3 

AA78 CD 70 A8 C3 4A A8 B7 20 

AA80 06 21 94 AF C3 E 1 AB FE 

AA88 08 20 18 21 88 AF CD 34 

AA90 A9 3E 30 CD 6E A9 CD 70 

AA98 A8 CD 6E A9 3E 27 12 13 

AAAO 06 01 C9 FE 10 20 OB 21 

AAA8 58 AF CD 34 A9 06 02 C3 

AABO 4A A9 21 5C AF CD 34 A9 

AAB8 FE 18 28 Fl 06 02 C3 99 

AACO A9 FE 76 20 08 21 6C AF 

AAC8 06 01 C3 34 A9 21 38 AF 

AADO CD 34 A9 06 01 CD 3F A9 

AAD8 CD 70 A8 C3 Al A8 F5 CD 

AAEO 9A A8 21 8C AE 09 CD 34 

AAE8 A9 FE 08 28 07 FE 10 30 

AAFO 03 CD 7A A8 06 01 Fl C3 

AAF8 Al A8 F5 E6 07 4F OC Fl 

ABOO OD CA 3B AC OD CA F4 AB 

AB08 OD CA EB AB OD 28 5C OD 

AB10 28 48 OD 28 2E OD 28 OD 

AB18 21 60 AF CD 34 A9 06 01 

AB20 E6 38 C3 12 A8 CO 9A A8 

AB28 ES 21 8C AE 09 CD 34 A9 
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AB30 FE 08 28 07 FE 10 30 03 

AB38 CD 7A A8 06 02 El 23 7E 

AB40 C3 12 A8 CB 5F 28 OS 21 

AB48 50 AF CO 34 A3 18 17 21 

AB50 54 AF CD 34 A9 06 01 C3 

AB58 6E A9 21 50 AF CD 34 A3 

AB60 CD 82 A9 CD 70 AS 06 03 

AB68 C3 4A A8 FE C3 20 08 21 

AB70 4C fiF CD 34 A9 18 EF FE 

A678 DB 20 19 21 3C AF CD 34 

AB80 A9 CD 7A AS 2A 00 42 23 

AB88 CD 64 B8 7E CD 12 AS 06 

AB90 02 C3 6B AS FE D3 20 OC 

AB98 21 40 AF CD 34 AS CD 84 

ABAO AB C3 7F A8 FE E3 20 17 

ABAS 21 88 AF CD 34 AS 21 90 

ABBO AF CD 34 A9 IB CD 70 A8 

ABB8 06 01 3E 20 C3 62 A9 FE 

ABCO EB £0 17 21 88 AF CD 34 

ABC8 A9 3E 01 CD F4 A8 CD 70 

ASDO AS AF 32 05 42 06 01 C3 

ABD8 91 A8 FE F3 20 08 21 64 

ABEO AF 06 01 C3 34 A9 21 68 

ABES AF IS Ffc 21 4C AF CD 34 

ABFO A9 C3 60 AB CB 5F 28 38 

ABF8 FE D9 20 05 21 8C AF 18 

ACOO EO FE C9 20 05 21 44 AF 

AC08 18 D7 FE E9 20 1 1 21 4C 

AC 10 AF CO 34 A9 CD 64 AS 06 

AC18 01 CD 91 A8 C3 6B A8 21 

AC20 38 AF CD 34 A9 06 01 CD 

AC28 95 A8 CD 70 A8 C3 91 AS 

AC30 21 48 AF CD 34 AS 06 01 

AC38 C3 6E A9 21 44 AF CD 34 

AC40 A9 06 01 C3 82 A9 3A 05 

AC48 42 B7 28 01 23 23 7E FE 

AC50 40 38 25 F5 E6 CO 07 07 

AC58 07 07 4F 06 00 21 C8 AE 

AC60 09 CD 34 A9 Fl F5 E6 38 

AC68 OF OF OF C6 30 12 13 Fl 

AC70 CD 70 A8 06 02 C3 Al A8 

AC78 F5 CD 9A AS Fl 21 AC AE 

AC80 09 CD 34 A9 06 02 C3 Al 

AC88 A8 23 7E FE CO 30 7A FE 

AC90 AO D2 CA AD FE 80 30 71 

AC98 FE 40 38 6D F5 E6 07 4F 

ACAO Fl OC OD CA 98 AD OD CA 

ACA8 81 AD OD CA BO AD OD CA 

ACBO 63 AD OD CA 57 AD OD CA 

AC88 3D AD OD CA IB AD FE 70 

ACCO 30 47 FE 60 30 2B 21 38 
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ACC8 AF CD 34 A9 CB 5F 28 11 

ACDO CD 7A A8 06 49 FE 5F 20 

ACD8 02 06 52 78 12 13 06 02 

ACEO C9 06 49 FE 4F 20 02 06 

ACE8 52 78 12 13 06 02 C3 7F 

ACFO AS 21 74 AF CB 5F 28 03 

ACF8 21 78 AF CD 34 A9 06 02 

ADOO CD 64 A8 CD 91 AS C3 6B 

AD08 (=18 21 AO AF 11 E8 41 CD 

AD10 34 A3 2A 00 42 7E 06 01 

AD18 C3 12 A8 FE 60 30 EA FE 

AD20 4E 28 E6 21 84 AF CD 34 

AD28 A9 06 30 FE 46 28 08 06 

AD30 31 FE 56 28 02 06 32 78 

AD38 12 13 06 02 C9 FE 50 30 

AD40 C8 21 44 AF CD 34 A3 IB 

AD48 IB 06 49 FE 4D 28 02 06 

ADSO 4E 78 12 13 06 02 C9 FE 

AD58 44 20 AE 21 70 AF 06 02 

AD60 C3 34 A9 21 38 AF CD 34 

AD68 A9 06 04 CB 5F 20 09 CD 

AD70 3D AA CD 70 AS C3 62 A9 

AD78 CD 62 A9 CD 70 A8 C3 3D 

AD80 AA FE 71 CA 09 AD 21 40 

AD88 AF CD 34 A9 21 98 AF CD 

AD90 34 A9 IB 06 02 C3 3F A9 

AD98 FE 70 CA 09 AD 21 3C AF 

AOAO CD 34 A9 06 02 CD 3F A3 

ADAS 21 9C AF CD 34 A9 IB C9 

ADBO 21 90 AE CB 5F 20 03 21 

ADB8 98 AE CD 34 A9 FS CD 91 

ADCO A8 Fl CD 70 A8 06 02 C3 

ADC8 62 A9 E6 07 FE 04 D2 09 

ADDO AD E6 03 07 07 07 07 4F 

ADDS 7E E6 18 OF 81 4F 06 00 

ADEO 21 F8 AE 09 06 02 C3 34 

ADE8 A9 22 00 42 C5 D5 11 E8 

ADFO 41 01 55 AE C5 AF 32 05 

ADF8 42 32 06 42 7E FE 40 DA 

AEOO A4 AS FE 80 DA C 1 AA FE 

AE08 CO DA DE AA FE CB CA 46 

AE10 AC FE ED CA 89 AC FE DD 

AE18 20 22 3E 01 32 05 42 32 

AE20 06 42 23 22 00 42 01 46 

AE28 AE CS 7E FE DD CA 45 AE 

AF.30 FE FD CA 45 AE FE ED CA 

AE38 45 AE 18 CO FE FD C2 FA 

AE40 AA 3E 02 18 D7 CI 2A 00 

AE48 42 2B 22 00 42 3A 06 42 

AE50 B7 C2 09 AD C9 AF 12 78 

AE58 32 04 42 48 06 00 2A 00 
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ft£60 42 09 22 02 42 Dl CI C9 

AE68 42 43 44 45 48 4C 4D 41 

AE70 42 43 44 45 48 4C 53 50 

AE78 49 58 49 59 4E 5A 5A 20 

ftESO 4E 43 43 20 50 4F 50 45 

AE88 50 20 4D 20 41 44 44 20 

AE30 41 44 43 20 53 56 42 20 

AE38 53 42 43 20 41 4E 44 20 

AEAO 58 4F 52 20 4F 52 20 20 

ftEA8 43 50 20 20 52 4C 43 20 

AEBO 52 52 43 20 52 4C 20 20 

AEB8 52 52 20 20 53 4C 41 20 

AECO 53 52 41 20 53 4C 49 20 

AEC8 53 52 4C 20 42 49 54 20 

AEDO 52 45 53 20 53 45 54 20 

AED8 52 4C 43 41 52 52 43 41 

AEEO 52 4C 41 20 52 52 41 20 

AEE8 44 41 41 20 43 SO 4C 20 

AEFO 53 43 46 20 43 43 46 20 

AEF8 4C 44 49 20 4C 44 44 20 

AFOO 4C 44 49 52 4C 44 44 52 

AF08 43 50 49 20 43 50 44 20 

AF10 43 50 49 52 43 50 44 52 

AF18 49 4E 49 20 49 4E 44 20 

AF20 49 4E 49 52 49 4E 44 52 

AF28 4F 55 54 49 4F 55 54 44 

AF30 4F 54 49 52 4F 54 44 52 

AF38 4C 44 20 20 49 4E 20 20 

AF40 4F 55 54 20 52 45 54 20 

AF48 50 4F 50 20 4A 50 20 20 

AF50 43 41 4C 4C 50 55 53 48 

AF58 44 4A 4E 5ft 4A 52 20 20 

AF60 52 53 54 20 44 49 20 20 

AF68 45 49 20 20 48 41 4C 54 

AF70 4E 45 47 20 52 52 44 20 

ftF?8 52 4C 44 20 49 4E 43 20 

AF80 44 45 43 20 49 4D 20 20 

AF88 45 58 20 20 45 58 58 20 

AF90 28 53 50 29 4E 4F 50 20 

AF98 28 43 29 2C 2C 23 43 29 

AFAO 44 45 46 42 11 C8 44 CD 

AFA8 E9 AD D5 C5 05 El 13 01 

AFeO 27 00 36 20 EO BO CI Dl 

AFB8 2A 00 42 C5 D5 CD 42 A8 

FlFCO CD 87 A8 CD 87 A8 3fl 04 

AFC8 42 47 7E 23 CD 03 AS 10 

flFDO F9 Dl EB 01 1 00 09 E8 

PIFD8 05 21 E8 41 7E B7 28 05 

AFEO 12 13 23 18 F7 El 01 18 

AFE8 OO 09 CI EB 21=1 02 42 10 

AFFO B6 C9 42 43 3A 20 44 45 41 



Si -01^ 

- - - - AFF8 3A 20 48 4C 3A 20 4 1 46 

B000 3A 20 42 43 60 20 44 45 

B008 60 20 48 4C 60 20 41 46 

B010 60 20 49 58 3A 20 49 59 

B01S 3A 20 53 50 3fl 20 50 43 

B020 3ft 20 20 28 48 4C 29 3A 

B028 20 20 20 28 53 50 29 3ft 

B030 20 53 5fl 58 48 58 50 4E 

B038 43 46 49 4C 45 4E 41 4D 

8040 45 20 53 54 41 52 54 20 

B048 45 4E 44 20 20 20 45 4E 

B050 54 52 59 58 20 20 20 20 

BOSS 59 20 20 20 20 58 2B 59 

B060 20 20 59 2D 58 20 20 58 

B068 2D 59 21 OO FO 01 28 00 

B070 11 01 FO 36 03 ED BO 06 

B078 OC C5 06 04 36 02 23 10 

B080 FB 06 06 36 04 23 10 FB 

B088 CI 10 EE 06 02 36 02 23 

8090 10 FB 06 OC 36 09 23 10 

B098 FB 06 02 C5 06 06 36 02 

BOFiO 23 10 FB 06 04 36 04 23 

BOAS 10 FB CI 10 EE E5 Dl 13 

SOBO 36 05 01 BE 01 ED BO 06 

B0B8 08 C5 06 06 36 02 23 10 

BOCO FB 06 04 36 09 23 36 09 

B0C8 23 23 36 01 23 36 01 23 

BOOO 23 10 FO 06 Oft 36 04 23 

B0D8 10 FB CI 10 DC C9 C5 D5 

BOEO E5 11 80 46 06 08 C5 CD 

B0E8 42 ft8 CD 84 AS E5 06 08 

BOFO 7E CD 03 A8 CD 87 A8 23 

B0F8 10 F6 El CD 84 A8 01 08 

B100 00 ED BO CI 10 EO El Dl 

B108 CI C9 CD 2B 00 B7 28 FA 

B110 FE 01 CA A3 B3 C9 C5 D5 

B118 E5 21 C8 44 11 C9 44 01 

B120 B7 01 36 20 ED BO El Dl 

B128 CI C9 E5 Dl 01 F8 FF 09 

B130 CD E9 AD DF 38 Fft 2A 00 

B138 42 C9 CD 2A Bl 06 OB C3 

B140 A4 AF 2A 46 42 11 F8 FF 

B148 18 06 2ft 46 42 11 09 00 

B150 19 22 46 42 C9 3A 42 42 

B158 B7 20 05 3E 06 CD 42 Bl 

B160 3D 32 42 42 C9 3ft 42 42 

B168 FE 3F 20 05 3E 37 CD 4A 

B170 Bl 3C 18 ED 3A 42 42 FE 

B178 08 30 05 C6 08 CD 42 Bl 

B180 D6 08 18 DD 3A 42 42 FE 

B188 38 38 05 D6 08 CD 4ft Bl 

42 B130 C6 08 18 CD 3A 43 42 E6 



S^Oy-T I B198 01 EE 01 32 43 42 C9 3A 

B1A0 42 42 F5 E6 38 6F 26 00 

B1A8 ES Dl 29 29 19 Fl E6 07 

B1B0 5F OT 83 C6 86 5F 16 46 

B1B8 3A 43 42 B7 28 01 13 19 

BICO 22 44 42 2A 46 42 CD DE 

B1C8 BO 2A 48 42 CD 3A Bl 2A 

B1D0 44 42 36 7F CD OA Bl FE 

BIOS OS 20 07 CD 94 Bl C4 55 

B1E0 Bl AF FE 09 20 07 CD 94 

B1E8 Bl CC 65 Bl AF FE OA 20 

B1F0 04 CD 84 Bl AF FE 5B 20 

B1F8 04 CO 74 Bl AF FE 3B 20 

B200 08 2ft 46 42 11 40 00 18 

B208 Oft FE 2D 20 OB 2A 46 42 

B210 11 CO FF 19 22 46 42 ftF 

B218 FE IF CA 8E B2 CD E6 B2 

B220 FE 5C 20 07 22 22 42 CD 

B228 7C 35 AF FE 5D 20 26 ED 

B230 5B 22 42 B7 ED 52 1 1 80 

B238 00 19 7C B7 20 17 7D D6 

B240 81 2A 22 42 77 ED 5B 48 

B248 42 DF 23 D4 99 B4 CD 7C 

B250 35 AF 32 43 42 FE 30 DA 

B258 9F Bl FE 47 D2 9F Bl FE 

B260 3A 38 05 FE 41 DA 3F Bl 

B268 D6 30 FE OA 38 02 D6 07 

B270 4F 3A 43 42 B7 20 12 CB 

B278 01 CB 01 CB 01 CB 01 3E 

B280 OF A6 Bl 77 3E 09 C3 E2 

8288 Bl 3E FO fife 18 F4 3fi 42 

B290 42 F5 E6 38 6F 26 00 E5 

B29S Dl 29 29 19 11 AO 46 Fl 

B2A0 E6 07 83 5F 19 22 44 42 

B2A8 2A 46 42 CD DE BO 20 44 

B2B0 42 36 7F CD OA Bl FE 08 

B2B8 20 04 CD 55 Bl AF FE 09 

B2C0 20 04 CD 65 Bl FIF FE OA 

62C8 20 04 CO 84 Bl AF FE 5B 

B2D0 20 04 CD 74 Bl AF FE IF 

B2D8 CA 9F Bl B7 28 BO CD E6 

B2E0 B2 77 3E 09 18 D8 ED 5B 

B2E8 42 42 16 00 2A 46 42 19 

B2F0 22 48 42 C9 21 00 00 1 Fl 

B2F8 13 FE 20 28 FA IB FE OD 

B300 37 C8 1A 13 D6 30 FE OA 

B308 38 02 D6 07 E6 OF 29 29 

B310 29 29 85 6F 1A FE 20 C8 

B318 FE OD C8 18 E5 11 00 44 

B320 1A 13 FE OD CA A3 B3 FE 

B328 20 28 F5 32 20 42 2A 48 
\ 
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</.£'.■*? • B330 42 22 08 42 06 05 DD 21 

B338 08 42 04 CD F4 B2 38 1 1 

B340 OS DD 75 00 DD 74 01 DD 

B348 23 00 23 FE OD 28 02 10 

B350 E9 3E 06 90 32 07 42 CD 

B358 87 (=18 3ft 20 42 C9 48 36 

B360 7F CO OA Bl FE 08 20 OA 

B368 78 B3 28 06 04 36 20 2B 

B370 18 ED FE OD 20 02 77 C9 

B378 FE 20 38 E3 FE 80 30 DF 

B380 77 78 B7 28 DA 05 23 18 

B388 D6 CD C9 01 ED 73 3C 42 

B390 31 3C 42 FD E5 DD E5 D9 

B398 08 F5 E5 D5 C5 D9 08 F5 

B3A0 E5 D5 C5 31 88 42 11 28 

B3A8 44 21 F2 AF DD 21 28 42 

B3B0 06 OC C5 01 04 00 EO BO 

B3B8 DD 7E 01 CD 03 AS DD 7E 

B3C0 00 CD 03 A8 DD 23 DO 23 

B3C8 CD 84 A3 CI 10 E4 3E 46 

B3D0 12 13 CD 87 A8 3A 2E 42 

B3D8 4F 06 08 21 31 BO 3E 2D 

B3E0 CB 01 30 01 7E 23 12 13 

B3E8 10 F4 CO 84 A8 21 21 BO 

B3F0 01 08 00 ED BO 2A 2C 42 

B3F8 7E CD 03 ft8 21 29 BO 01 

B4O0 08 00 ED BO 2A 3C 42 7E 

B408 CD 03 (=18 23 7E CD 03 A8 

B410 CD 6(=1 BO 21 00 44 11 01 

B418 44 01 27 00 36 20 ED BO 

B420 2A 46 42 CD DE BO 21 00 

B428 44 06 27 CD SE B3 CD ID 

B430 B3 2A 08 42 ED 5B Oft 42 

B438 01 A3 B3 C5 FE 41 Cfl ftE 

B440 B4 FE 44 Cft 16 BB FE 45 

B448 Cft 66 00 FE 46 Cft IB B7 

B450 FE 47 CA IB B5 FE 48 CA 

B458 B4 B4 FE 49 CA EO B7 FE 

B460 4C CA 29 B6 FE 4D Cft C5 

B468 B6 FE 4F CA E7 B6 FE 50 

B470 CA BC B7 FE 51 CA BE B4 

B478 FE 52 CA 06 B5 FE 53 Cft 

B480 91 B5 FE 56 CA 29 B6 FE 

B488 57 Cft 47 B5 FE 58 CA 78 

B490 B7 FE 5A CA FZ B4 C3 A3 

B498 B3 D5 E5 22 48 42 7D E6 

B4A0 3F 32 42 42 5F 7D 93 6F 

B4A8 22 46 42 El Dl C9 CD 99 

B4B0 B4 C3 8E B2 CD 99 B4 AF 

B4B8 32 43 42 C3 9F Bl E5 06 

B4C0 OB CD A4 AF El CD OA Bl 



-CC-^I-V-. / B4C8 FE OA 20 05 CD E9 AD IS 

84D0 ED FE 5B 20 05 CD 2A Bl 

B4D8 18 E4 FE 3B 20 05 2A 02 

B4E0 42 t3 DB FE 2D 20 D7 06 

B4E8 OB C5 CD 2A Bl CI 10 F3 

B4F0 IB CC EB BT ED 52 DPI A3 

B4F8 B3 E5 CI EB E5 Dl 13 3A 

B50O OC 42 7T ED BO C9 EB CD 

B508 98 B4 3A OC 42 47 CD 6F 

B510 CF 13 24 10 F9 C9 70 CD 

B518 5B CE C9 22 3E 42 ED 7S 

B520 3C 42 21 8C B3 E5 ED 73 

B528 3C 42 31 28 42 CI Dl El 

B530 Fl D9 08 CI Dl El Fl D9 

B538 08 DD El FD E 1 ED 7B 3C 

B540 42 E5 2A 3E 42 E3 C9 EB 

B548 3A OC 42 47 CD 54 B5 13 

B550 24 10 F9 C9 7A FE 01 C2 

B558 7F CF 7B FE 68 DA 7F CF 

B560 FE 7A D2 7F CF C3 7B CF 

B568 CD 16 Bl 21 33 BO 11 FO 

B570 44 01 09 00 ED BO EB 06 

B578 OE CD 5E B3 21 F9 44 11 

B580 43 5B 7E FE OD 28 05 12 

B588 13 23 18 F6 AF 12 36 20 

B590 C9 CD 68 B5 21 00 58 1 1 

B598 48 5B 01 00 00 CD 20 CE 

B5A0 2A 08 42 22 OE 42 CD EB 

B5R8 B5 3E 01 CD E5 B5 78 3C 

B5B0 3C CD E5 B5 70 CD E5 B5 

B5B8 7C CD E5 B5 7E CD E5 B5 

B5C0 23 10 F9 ED 5B OA 42 DF 

B5C8 38 DC 3E 02 CD E5 B5 CD 

B5D0 E5 B5 3A OC 42 CD E5 B5 

B5D8 3A OD 42 CD E5 B5 I 1 48 

B5E0 58 CD 28 CE C9 1 1 48 58 

B5E8 C3 IB 00 2ft OE 42 EB 2A 

B5F0 OA 42 B7 ED 52 7C B7 20 

B5F8 05 ES CI 03 18 03 01 00 

BGOO 01 EB E5 09 22 OE 42 El 

B608 41 C9 C5 D5 E5 2A 22 42 

B610 7E 23 F5 7C FE 59 20 09 

B618 11 48 5B CD 36 CE 21 00 

B620 58 Fl 22 22 42 El Dl CI 

B628 C9 CD 68 B5 11 48 5B 21 

B630 00 58 01 00 00 22 22 42 

B638 CD 24 CE CD 36 CE 21 00 

B640 00 22 16 42 2B 22 14 42 

B648 CO OA B6 FE 02 28 38 FE 

B650 01 C2 A3 B3 CD OA B6 D6 

B658 02 47 CD OA B6 6F CD OA 



B66O B6 67 ED 5B 16 42 OF 38 

6668 03 22 16 42 ED 5B 14 42 

B670 DF 30 03 22 14 42 CD OA 

B678 B6 4F 3fl 20 42 FE 56 28 

B680 01 71 23 10 DD 18 CI CD 

B688 Oft B6 CD Oft B6 6F CD Oft 

B690 B6 67 22 18 42 22 46 42 

B698 tl 48 SB CD 28 CE 21 42 

B6A0 BO 11 40 45 01 11 OO ED 

B6A8 BO 11 68 45 2fl 14 42 CD 

B6B0 42 A8 CD 84 A8 2A 16 42 

B6B8 CO 42 A8 CD 84 A8 2ft 18 

B6C0 42 CD 42 AS C9 £B B7 ED 

B6C8 52 D8 E5 CI 03 2A OC 42 

B6D0 EB DF 38 04 ED BO 18 08 

B6D8 09 EB 09 EB IB 2B ED B8 

B6E0 2A OC 42 22 46 42 C9 OF 

B6E8 DO CD E9 AD 18 F9 3A 20 

B6F0 42 FE 4F CO D5 ED 58 OE 

B6F8 42 DF 30 ID ED 5B OC 42 

B700 DF 38 16 B7 ED 52 ED 5B 

B708 10 42 19 EB 2A 00 42 7E 

B710 FE ED 20 01 23 23 73 23 

B718 72 Dl C9 31=1 07 42 B7 28 

B720 20 FE 01 28 16 21 Oft 42 

B728 47 05 11 1C 42 7E 23 23 

B730 12 13 10 F9 3A 07 42 3D 

B738 32 21 42 2A 08 42 22 1ft 

B740 42 ED 5B 1A 42 21 1C 42 

B748 3A 21 42 47 IA BE 20 10 

B750 D5 05 28 13 13 23 1A BE 

B758 20 02 18 FS Dl 13 18 E5 

B760 13 7B B2 C8 13 18 E5 Dl 

B768 ED 53 46 42 EB 23 22 1A 

B770 42 2B 06 OB CD A4 AF C9 

6778 CD 16 Bl 21 53 BO 11 FO 

B780 44 01 17 00 ED BO 11 18 

B788 45 2fl 08 42 CO 42 A8 E5 

B790 CI 2ft OA 42 CD 87 AS CD 

B798 42 AS CD 87 fl8 E5 09 CD 

B7A0 42 ft8 CD 87 A8 El B7 ED 

B7fle 42 CD 42 ft8 CD 87 A8 CS 

B7B0 El ED 4B Oft 42 B7 ED 42 

B7B8 CD 42 A8 C9 06 01 CD A4 

B7C0 AF CD 29 05 CO E5 21 CS 

67C8 44 06 28 4E CD OE 05 23 

B7D0 10 F9 OE OD CD OE 05 El 

B7D8 ED 5B OA 42 DF 38 DD C9 

67E0 7D CD 16 Bl E6 03 C6 30 

B7E8 6F 26 00 22 Eft 41 21 22 

B7F0 43 22 E8 41 21 C8 44 22 



B7F8 20 40 21 E8 41 C3 73 41 



TAPE-VERSION PES MONITORS 



7000 C3 36 7B F5 F5 OF OF OF 

7008 OF CD 26 70 Fl CD 26 70 

7010 Fl C9 FE AO 38 06 F5 3E 

7018 30 12 13 Fl F5 CD 03 70 

7020 3E 48 12 13 Fl C9 E6 OF 

7028 C6 90 27 CE 40 27 12 13 

7030 C9 F5 7C FE AO 38 05 3E 

7038 30 12 13 7C CD 03 70 7D 

7040 18 DB 7C CD 03 70 7D C3 

7048 03 70 C5 F5 2ft 00 42 7E 

7060 FE ED 20 01 23 23 4E 23 

7058 46 C5 El CD 31 70 CD 77 

7060 7E Fl CI C9 F5 3E 28 12 

7068 13 Fl C9 F5 3E 29 18 F7 

7070 F5 3E 2C 18 F2 F5 3E 41 

7078 18 ED CD 75 70 18 Fl CD 

7080 70 70 18 Fl CD 87 70 F5 

7088 3E 20 18 DB F5 3E 2B 18 

7090 D6 3E 02 18 02 3E 03 C3 

7098 FO 70 F5 E6 38 OF 4F 06 

70A0 00 Fl C9 C5 E5 F5 E6 07 

70A8 4F 06 00 21 6C 76 09 7E 

70B0 FE 4D 28 06 12 13 Fl El 

70B8 CI C9 3ft 05 42 B7 20 OF 

7OC0 CO 64 70 3E 02 CD FO 70 

70C8 CD 6B 70 Fl El CI C9 C6 

70D0 03 CD 64 70 CD FO 70 CD 

70D8 8C 70 2fi 00 42 23 7E CD 

70E0 12 70 CD 6B 70 AF 32 06 

70E8 42 Fl El CI 04 04 23 C9 

70FO CS E5 F5 E6 07 07 4F 06 

70F8 00 21 74 76 09 7E 12 13 

7100 23 7E 12 13 FE 4C 28 04 

7108 Fl EI CI C9 3A 05 42 B7 

7110 28 F6 IB IB 3E 49 12 S3 

7118 3A 05 42 C6 57 12 13 Fl 

7120 El CI F5 3A 06 42 B7 28 

7128 05 AF 32 06 42 04 Fl C9 

7130 C5 01 04 00 ED BO CD 87 

7138 70 CI C9 F5 E6 38 OF OF 

7140 OF CD A3 70 Fl C9 C5 F5 47 
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7148 2ft 00 42 23 7E 4F 06 00 

7150 FE 80 38 02 06 FF 23 09 

7158 CD 31 70 Fl CI C9 F5 E6 

7160 30 OF OF OF OF CD FO 70 

7168 Fl C9 CD 5E 71 F5 IB lfl 

7170 FE 50 20 07 IB CD 75 70 

7178 3E 46 12 13 Fl C9 C5 CO 

7180 9A 70 CB 09 21 80 76 09 

7188 7E 12 23 13 7E FE 20 28 

7190 02 12 13 CI C9 D6 20 CD 

7138 7E 71 CD 70 70 C3 46 71 

71ft0 F5 E6 07 4F OC Fl OD Cft 

71ft8 7ft 72 OD CR 52 72 OD 28 

71B0 51 OD 28 3ft OD 28 32 OD 

71B8 28 24 00 28 OC 21 DC 76 

71C0 CO 9A 70 09 06 01 C3 30 

71C8 71 E5 21 3C 77 06 02 CD 

71D0 30 71 El CD 3B 71 CD 70 

71D8 70 23 7E C3 12 70 21 84 

71E0 77 CD 30 71 06 01 C3 3B 

71E8 71 21 80 77 18 F3 CB 5F 

71F0 20 05 21 80 77 18 03 21 

71F8 84 77 CD 30 71 06 01 C3 

7200 5E 71 21 3C 77 CD 30 71 

7208 FE 20 30 19 CB 5F 28 OE 

7210 CD 7A 70 CO 64 70 06 01 

7218 CD 5E 71 C3 6B 70 CD 13 

7220 72 C3 7F 70 06 03 CB 5F 

7228 28 18 FE 30 38 05 CD 7ft 

7230 70 18 06 CO 91 70 CD 70 

7238 70 CD 64 70 CO 4FI 70 C3 

7240 6B 70 06 03 CD 39 72 CO 

7248 70 70 FE 30 D2 75 70 C3 

7250 91 70 CB 5F 28 13 21 90 

72.58 76 CD 30 71 06 01 F5 CO 

7260 91 70 Fl CO 70 70 C3 5E 

7268 71 21 3C 77 CD 30 71 06 

7270 03 CD 5E 71 CD 70 70 C3 

7278 4ft 70 B7 20 06 21 98 77 

7280 C3 E7 73 FE 08 20 18 21 

7288 8C 77 CD 30 71 3E 30 CO 

7290 6ft 71 CD 70 70 CD 6ft 71 

7298 3E 27 12 13 06 01 C9 FE 

72A0 10 20 OB 21 5C 77 CD 30 

72FI8 71 06 02 C3 46 71 21 60 

72B0 77 CO 30 71 FE L8 23 Fl 

72B8 06 02 C3 95 7 1 FE 76 20 

72C0 08 21 70 77 06 01 C3 30 

72C8 71 21 3C 77 CD 30 71 06 

72D0 01 CD 3B 71 CD 70 70 C3 

72D8 ft3 70 CD 9ft 70 21 90 76 



72E0 09 CD 30 71 F5 £6 38 FE 

72E8 10 28 07 FE 20 30 03 CD 

72F0 7A 70 06 01 Fl C3 A3 70 

72F8 F5 E6 07 4F OC Fl OD CPl 

7300 41 74 OD CR FA 73 OD CA 

7308 Fl 73 OD 28 61 OD 28 4D 

7310 OD 28 30 00 28 OD 21 64 

7318 77 CD 30 71 06 01 E6 38 

7320 C3 12 70 CD 9A 70 E5 21 

7328 90 76 09 CD 30 71 E6 38 

7330 FE 10 28 07 FE 20 30 03 

7338 CD 7A 70 06 02 El 23 7E 

7340 C3 12 70 CB 5F 28 OB 21 

7348 54 77 CD 30 71 06 03 C3 

7350 4A 70 21 58 77 CD 30 7 1 

7358 06 01 C3 6A 71 21 54 77 

7360 CD 30 71 CD 7E 71 CD 70 

7368 70 06 03 C3 4A 70 FE C3 

7370 20 08 21 50 77 CD 30 71 

7378 06 03 C3 4A 70 FE DB 20 

7380 13 21 40 77 CD 30 71 CD 

7388 7A 70 2A 00 42 23 CD 64 

7390 70 7E CD 12 70 06 02 C3 

7398 6B 70 FE D3 20 OC 21 44 

73A0 77 CD 30 71 CD 8fl 73 C3 

73A8 7F 70 FE E3 20 17 21 8C 

73B0 77 CD 30 71 21 94 77 CD 

73B8 30 71 IB CD 70 70 06 01 

73C0 3E 20 C3 5E 71 FE EB 20 

73C8 17 21 8C 77 CD 30 71 3E 

73D0 01 CD FO 70 CD 70 70 AF 

73D8 32 05 42 06 01 C3 91 70 

73E0 FE F3 20 08 21 68 77 06 

73E8 01 C3 30 71 21 6C 77 18 

73F0 F6 21 50 77 CD 30 71 C3 

73F8 63 73 CB 5F 28 38 FE D9 

7400 20 05 21 90 77 18 EO FE 

7408 C9 20 05 21 48 77 18 D7 

7410 FE E9 20 11 21 SO 77 CD 

7418 30 71 CD 64 70 06 01 CD 

7420 91 70 C3 6B 70 21 3C 77 

7428 CD 30 71 06 01 CD 95 70 

7430 CD 70 70 C3 91 70 21 4C 

7438 77 CD 30 71 06 01 C3 6A 

7440 71 21 48 77 CD 30 71 06 

7448 01 C3 7E 71 3A 05 42 B7 

7450 28 01 23 23 7E FE 40 38 

7458 25 F5 £6 CO 07 07 07 07 

7460 4F 06 00 21 CC 76 09 CD 

7468 30 71 Fl F5 E6 38 OF OF 

7470 OF C6 30 12 13 Fl CD 70 
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7478 70 06 02 C3 A3 70 CD 9A 

7480 70 21 BO 76 09 CD 30 71 

7488 06 02 C3 A3 70 23 7E FE 

7490 CO 30 7A FE AO D2 CE 75 

7498 FE 80 30 71 FE 40 38 6D 

74AO F5 E6 07 4F Fl OC 00 CA 

74A8 9C 75 OD CA 85 75 OD CA 

74B0 B4 75 OD CA 67 75 00 CA 

74B8 5B 75 OD CFl 41 75 OD CA 

74C0 IF 75 FE 70 30 47 FE 60 

74C8 30 28 21 3C 77 CO 30 71 

74O0 CB 5F 28 11 CD 7A 70 06 

74D8 49 FE 5F 20 02 06 52 78 

74E0 12 13 06 02 C9 06 49 FE 

74E8 4F 20 02 06 52 78 12 13 

74F0 06 02 C3 7F 70 21 78 77 

74F8 CB 5F 28 03 21 7C 77 CO 

7500 30 71 06 02 CD 64 70 CD 

7508 91 70 C3 68 70 21 (=14 77 

7510 11 E8 41 CD 30 71 2A 00 

751S 42 7E 06 01 C3 12 70 FE 

7520 60 30 Eft FE 4E 28 E6 21 

7528 88 77 CD 30 71 06 30 FE 

7530 46 28 08 06 31 FE 56 28 

7538 02 06 32 78 12 13 06 02 

7540 C9 FE 50 30 C8 21 48 77 

7548 CD 30 71 IB IB 06 49 FE 

7550 4D 28 02 06 4E 78 12 13 

7558 06 02 C9 FE 44 20 AE 21 

7560 74 77 06 02 C3 30 71 21 

7568 3C 77 CD 30 71 06 04 CB 

7570 5F 20 09 CD 33 72 CD 70 

7578 70 C3 5E 71 CD 5E 71 CD 

7580 70 70 C3 39 72 FE 71 CA 

7588 OD 75 21 44 77 CD 30 71 

7590 21 9C 77 CD 30 71 IB 06 

7598 02 C3 3B 71 FE 70 CA OD 

75A0 75 21 40 77 CD 30 71 06 

7SA8 02 CD 3B 71 21 AO 77 CD 

75B0 30 71 IB C9 21 34 76 CB 

75B8 5F 20 03 21 9C 76 CD 30 

75C0 71 F5 CD 91 70 Fl CO 70 

75C8 70 06 02 C3 5E 71 E6 07 

75D0 FE 04 D2 OD 75 E6 03 07 

75D8 07 07 07 4F 7E E6 18 OF 

75E0 81 4F 06 00 21 FC 76 09 

75E8 06 02 C3 30 71 22 00 42 

75F0 C5 05 11 E8 41 01 59 76 

75F8 C5 AF 32 05 42 32 06 42 

7600 7E FE 40 DA AO 71 FE 80 



7608 Dft BD 72 FE CO DPI Dft 72 

7610 FE CB Cft 4C 74 FE ED Cft 

7618 8D 74 FE DD 20 22 3E 01 

7620 32 05 42 32 06 42 23 22 

7628 00 42 01 4ft 76 C5 7E FE 

7630 DD CPl 49 76 FE FD Cft 49 

7638 76 FE ED Cfi 43 76 18 CO 

7640 FE FD C2 F8 72 3E 02 18 

7648 D7 CI 2ft 00 42 2B 22 00 

7650 42 3ft 06 42 B7 C2 OD 75 

7658 C9 AF 12 78 32 04 42 48 

7660 06 00 2ft 00 42 09 22 02 

7668 42 Dl CI C9 42 43 44 45 

7670 48 4C 40 41 42 43 44 45 

7678 48 4C 53 50 49 58 49 59 

7680 4E 5ft 5ft 20 4E 43 43 20 

7688 50 4F 50 45 50 20 4D 20 

7690 41 44 44 20 41 44 43 20 

7698 53 55 42 20 53 42 43 20 

76A0 41 4E 44 20 58 4F 52 20 

76A8 4F 52 20 20 43 50 20 20 

76B0 52 4C 43 20 52 52 43 20 

76B8 52 4C 20 20 52 52 20 20 

76C0 53 4C 41 20 53 52 41 20 

76C8 53 4C 49 20 53 52 4C 20 

76D0 42 49 54 20 52 45 53 20 

76D8 53 45 54 20 52 4C 43 41 

76E0 52 52 43 41 52 4C 41 20 

76E8 52 52 41 20 44 41 41 20 

76F0 43 50 4C 20 53 43 46 20 

76F8 43 43 46 20 4C 44 49 20 

7700 4C 44 44 20 4C 44 49 52 

7708 4C 44 44 52 43 50 49 20 

7710 43 50 44 20 43 50 43 52 

7718 43 50 44 52 49 4E 49 20 

7720 49 4E 44 20 49 4E 49 52 

7728 49 4E 44 52 4F 55 54 49 

7730 4F 55 54 44 4F 54 49 52 

7738 4F 54 44 52 4C 44 20 20 

7740 49 4E 20 20 4F 55 54 20 

7748 52 45 54 20 50 4F 50 20 

7750 4ft 50 20 20 43 41 4C 4C 

7758 50 55 53 48 44 4FI 4E 5ft 

7760 4ft 52 20 20 52 53 54 20 

7768 44 49 20 20 45 43 20 20 

7770 48 41 4C 54 4E 45 47 20 

7778 52 52 44 20 52 4C 44 20 

7780 49 4E 43 20 44 45 43 20 

7788 49 4D 20 20 45 58 20 20 

7790 45 58 58 20 28 53 50 29 

7798 4E 4F SO 20 28 43 29 2C 51 
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77A0 2C 28 43 29 44 45 46 42 

77A8 11 C8 44 CD £0 75 D5 C5 

77B0 D5 El 13 01 27 00 36 20 

77B8 E0 BO CI Dl 2A 00 42 C5 

77C0 D5 CD 42 70 CD 87 70 CO 

77C8 87 70 3ft 04 42 47 7E 23 

77D0 CD 03 70 10 F9 Dl EB 01 

77D8 10 00 09 EB 05 21 E8 41 

77E0 7E B7 28 05 12 13 23 18 

77E8 F7 El Ol 18 00 09 CI EB 

77FO 2fl 02 42 10 B6 C9 42 43 

77FB 3A 20 44 45 3ft 20 48 4C 

7800 3ft 20 41 46 3ft 20 42 43 

7808 60 20 44 45 60 20 48 4C 

7810 60 20 41 46 60 20 49 58 

7818 3A 20 48 59 3ft 20 53 50 

7820 3ft 20 50 43 3ft 20 20 28 

7828 48 4C 29 3ft 20 20 20 28 

7830 53 50 29 3A 20 53 5ft 58 

7838 48 58 50 4E 43 4E 41 40 

7840 45 20 20 20 20 53 54 41 

7848 52 54 20 45 4E 44 20 20 

7850 20 45 4E 54 52 59 54 41 

7858 50 45 20 45 52 52 4F 52 

7860 58 20 20 20 20 59 20 20 

7868 20 20 58 2B 59 20 20 59 

7870 20 58 20 20 58 2D 59 20 

7878 00 FO 01 28 00 11 01 FO 

7880 36 03 ED BO 06 OC C5 06 

7888 04 36 02 23 10 FB 06 06 

7890 36 04 23 10 FB CI 10 EE 

7898 06 02 36 02 23 10 FB 06 

78ft0 OC 36 09 23 10 FB 06 02 

78ft8 C5 06 06 36 02 23 10 FB 

78B0 06 04 36 04 23 10 FB CI 

78B8 10 EE E5 Dl 13 36 05 01 

78C0 BE 01 EO BO 06 08 C5 06 

78C8 06 36 02 23 10 FB 06 04 

78D0 36 09 23 36 09 23 23 36 

78D8 Ol 23 36 01 23 23 10 FO 

78E0 06 Oft 36 04 23 10 FB CI 

78E8 10 DC C9 C5 D5 E5 11 80 

78F0 46 06 08 CS CO 42 70 CD 

78F8 84 70 E5 0& 08 7E CD 03 

7900 70 CD 87 70 23 10 F6 El 

7908 CD 84 70 01 08 00 ED BO 

7910 CI 10 EO El Dl CI C9 CD 

7918 2B 00 B7 28 FR FE 01 CA 

7920 BO 7B C9 C5 D5 E5 21 C8 

7928 44 11 C9 44 01 B7 01 36 

7930 20 EO BO El 01 CI C9 E5 

7938 Dl 01 F8 FF 09 CD ED 75 



7940 DF 38 FR 2A 00 42 C3 CD 

7948 37 79 06 OB C3 A8 77 2A 

7950 46 42 11 F8 FF 18 06 2A 

7958 46 42 11 08 00 19 22 46 

7360 42 C9 3A 42 42 B7 20 05 

7968 3E 08 CD 4F 79 30 32 42 

7970 42 C9 3FI 42 42 FE 3F 20 

7978 OS 3E 37 CD 57 79 3C 18 

7980 ED 3A 42 42 FE 08 30 05 

7988 C6 08 CD 4F 79 D6 08 18 

7990 DD 3A 42 42 FE 38 38 05 

7998 D6 08 CD 57 79 C 6 08 18 

79AO CD 3A 43 42 E6 Ot EE 01 

79A8 32 43 42 C9 3A 42 42 F5 

79B0 E6 38 6F 26 00 E5 01 29 

79B8 29 19 Fl E6 07 5F 07 83 

79C0 C6 86 5F 16 46 3A 43 42 

79C8 B7 28 01 13 19 22 44 42 

79DO 2A 46 42 CD EB 78 2A 48 

79D8 42 CD 47 79 2A 44 42 36 

79E0 7F CD 17 79 FE 08 20 07 

79E8 CD Al 79 C4 62 79 AF FE 

79F0 09 20 07 CD Al 79 CC 72 

79F8 79 AF FE Oft 20 04 CD 91 

7AOO 79 AF FE 5B 20 04 CD 81 

7A08 79 AF FE 3B 20 08 2A 46 

7A10 42 11 40 00 18 OA FE 2D 

7A18 20 OB 2A 46 42 1 1 CO FF 

7A20 19 22 46 42 AF FE IF CA 

7A28 9B 7A CD F3 7A FE 5C 20 

7030 07 22 22 42 CD 7C 35 AF 

7A38 FE 5D 20 26 ED 5B 22 42 

7A40 B7 ED 52 11 80 00 19 7C 

7A48 B7 20 17 7D D6 81 2A 22 

7A50 42 77 ED 5B 48 42 DF 23 

7A58 D4 97 7C CD 7C 35 AF 32 

7A60 43 42 FE 30 DA AC 79 FE 

7A68 47 D2 AC 79 FE 3A 33 05 

7A70 FE 41 DA AC 73 D6 30 FE 

7A78 OA 38 02 D6 07 4F 3A 43 

7A80 42 B7 20 12 CB 01 CB 01 

7A88 CB 01 CB 01 3E OF A6 81 

7A90 77 3E 09 C3 EF 73 3E FO 

7A98 A6 18 F4 3A 42 42 F5 E6 

7AA0 38 6F 26 00 E5 Dl 29 29 

7AA8 13 11 AO 46 Fl E6 07 83 

7AB0 5F 19 22 44 42 2A 46 42 

7AB8 CD EB 78 2A 44 42 36 7F 

7AC0 CD 17 79 FE 08 20 04 CD 

7AC8 62 79 AF FE 09 20 04 CD 

7AD0 72 73 AF FE OA 20 04 CD 

7AD8 91 79 AF FE 5B 20 04 CD 



7AE0 81 79 AF FE IF CA AC 79 

7AE8 B7 28 BO CD F3 7A 77 3E 

7AF0 09 18 D8 ED 5B 42 42 16 

7AF8 00 2A 46 42 19 22 48 42 

7B00 C9 21 00 00 1ft 13 FE 20 

7B08 28 FA IB FE OD 37 C8 1A 

7B10 13 D6 30 FE OA 38 02 D6 

7B18 07 E6 OF 28 29 29 29 35 

7B20 6F 1A FE 20 C8 FE OD C8 

7B28 18 E5 11 00 44 1A 13 FE 

7B30 00 CA BO 7B FE 20 28 F5 

7B38 32 20 42 2A 48 42 22 08 

7B40 42 06 OS DD 21 08 42 04 

7B48 CD 01 7B 38 11 05 DD 75 

7B50 00 DO 74 01 DD 23 DD 23 

7B58 FE OD 28 02 10 E9 3E 06 

7B60 90 32 07 42 CD 87 70 3A 

7B68 20 42 C9 48 36 7F CD 17 

7B70 79 FE 08 20 OA 78 B9 28 

7B78 F3 04 36 20 2B 18 ED FE 

7B80 OD 20 02 77 C9 FE 20 38 

7B88 E3 FE 80 30 DF 77 78 B7 

7B90 28 OA 05 23 18 D6 CD C9 

7B98 01 ED 73 3C 42 31 3C 42 

7BA0 FD E5 DD E5 D9 08 F5 E5 

7BA8 D5 C5 D9 08 FS E5 D5 C5 

7BB0 31 88 42 11 28 44 21 F6 

7BB8 77 DD 21 28 42 06 OC C5 

7BC0 01 04 00 EO BO DD 7E 01 

7BC8 CD 03 70 DD 7E 00 CD 03 

7BD0 70 DD 23 DD 23 CD 84 70 

7BD8 CI 10 E4 3E 46 12 13 CD 

7BE0 87 70 3A 2E 42 4F 06 08 

7BE8 21 35 78 3E 2D CB 01 30 

7BF0 01 7E 23 12 13 10 F4 CD 

7BF8 84 70 21 25 78 01 08 00 

7C00 ED BO 2A 2C 42 7E CD 03 

7C08 70 21 2D 78 01 08 00 ED 

7C10 BO 2A 3C 42 7E CO 03 70 

7C18 23 7E CD 03 70 CD 77 78 

7C20 21 00 44 11 01 44 01 27 

7C28 00 36 20 ED BO 2A 46 42 

7C30 CD EB 78 21 00 44 06 27 

7C38 CD 6B 7B CD 2A 7B 2A 08 

7C40 42 ED 5B OA 42 01 BO 7B 

7C48 C5 FE 41 CA AC 7C FE 44 

7C50 CA BC 7C FE 45 CA 66 00 

7C58 FE 46 CA A4 7E FE 47 CA 

7C60 25 7D FE 48 CA B2 7C FE 

7C68 4C CA 51 7D FE 4D CA 4E 

M 7C70 7E FE 4F CA 70 7E FE 50 



7C78 Cft 45 7F FE 51 Cft BC 7C 

7C80 FE 53 Cft 69 7F FE 56 Cft 

7C88 51 7D FE 58 Cft 01 7F FE 

7C90 5ft Cft F0 7C C3 BO 7B D5 

7C98 E5 22 48 42 7D E6 3F 32 

7CftO 42 42 5F 7D 93 6F 22 46 

7Cft8 42 El Dl C9 CD 97 7C C3 

7CB0 96 7A CO 97 7C AF 32 43 

7CB8 42 C3 AC 79 E5 06 OB CD 

7CC0 ft8 77 El CD 17 79 FE Oft 

7CC8 20 05 CO ED 75 18 ED FE 

7CD0 5B 20 05 CD 37 79 18 £4 

7CD8 FE 3B 20 05 2ft 02 42 18 

7CE0 DB FE 2D 20 D7 06 OB C5 

7CE8 CD 37 73 CI 10 F9 18 CC 

7CF0 EB 67 ED 52 Dfl BO 76 E5 

7CF8 CI EB E5 Dl 13 3ft OC 42 

7D00 77 ED BO C9 CD ED 01 32 

7D08 27 44 C9 CD IF 02 32 27 

7D10 44 C9 CD 04 7D F5 3fi 26 

7018 44 EE Oft 32 26 44 Fl C9 

7D20 CD OB 70 18 FO 22 3E 42 

7D28 ED 7B 3C 42 21 99 7B E5 

7D30 ED 73 3C 42 3 1 28 42 C 1 

7D38 01 El Fl D9 08 CI Dl El 

7D40 Fl 09 08 DD El FD El ED 

7D48 7B 3C 42 E5 2ft 3E 42 E3 

7D50 C9 CD 23 79 21 3D 78 1 1 

7D58 FO 44 01 19 00 ED BO 21 

7D60 00 00 22 16 42 2B 22 14 

7D68 42 CD 4C 02 21 2ft 2A 22 

7D70 26 44 CO 04 ?D FE 55 C2 

7D78 CC 7D 21 18 45 06 06 CD 

7D80 04 7D 77 23 10 F9 CD 04 

7D88 7D FE 78 28 4D FE 3C C2 

7D90 CC 7D CD 04 7D 47 CD 04 

7D98 7D 6F CD 04 70 67 85 4F 

7Dft0 ED 5B 14 42 OF 30 03 22 

70ft8 14 42 ED 5B 16 42 DF 38 

7DB0 03 22 16 42 CD 04 7D 5F 

7DB8 3ft 20 42 FE 56 28 01 73 

7DC0 23 7B 81 4F 10 E4 CD 12 

7DC8 7D B9 28 Bft 21 56 78 11 

7DD0 68 45 01 Oft 00 ED BO C3 

7DD8 BO 7B CD 04 70 6F CD 04 

7DE0 7D 67 22 18 42 11 20 45 

7DE8 2ft 14 42 CD 42 70 CO 84 

7DF0 70 2ft 16 42 CD 42 70 CD 

7DF8 84 70 2A 18 42 CD 42 70 

7E00 CD 97 7C C3 BO 7B CD 23 

7E08 79 21 3D 78 11 FO 44 01 55 



7E10 05 00 ED BO EB 06 06 CD 

7E18 6B 7B 21 F5 41 11 E8 41 

7E20 7E FE OD 28 05 12 13 23 

7E28 18 F6 ftF 12 36 20 C9 2R 

7E30 OE 42 EB 2ft Oft 42 B7 ED 

7E38 52 7C B7 20 05 E5 CI 03 

7E40 18 03 01 00 01 EB E5 09 

7E48 22 OE 42 El 41 C9 EB B7 

7E50 ED 52 D8 £5 CI 03 2A OC 

7ES8 42 EB DF 38 04 ED BO 18 

7E60 08 09 EB 09 EB IB 2B ED 

7E68 B8 21=1 OC 42 22 46 42 C9 

7E70 DF DO CD ED 75 18 F9 3ft 

7E78 20 42 FE 4F CO D5 EO SB 

7E80 OE 42 DF 30 ID ED 5B OC 

7E88 42 DF 38 16 B7 ED 52 ED 

7E90 5B 10 42 IS EB 2ft 00 42 

7E98 7E FE ED 20 01 23 23 73 

7EftO 23 72 Dl C9 3A 07 42 B7 

7EA8 28 20 FE 01 28 16 21 Oft 

7EB0 42 47 05 11 1C 42 7E 23 

7EB8 23 12 13 10 F9 3ft 07 42 

7EC0 3D 32 21 42 2ft 08 42 22 

7EC8 lft 42 ED 5B 1ft 42 21 1C 

7ED0 42 3ft 21 42 47 1ft BE 20 

7ED8 10 D5 05 28 13 13 23 1A 

7EE0 BE 20 02 18 F5 Dl 13 18 

7EE8 E5 13 7B B2 CB 13 18 E5 

7EF0 Dl EO 53 46 42 EB 23 22 

7EF8 lfl 42 2B 06 OB CD ft8 77 

7F00 C9 CO 23 79 21 60 78 11 

7F08 FO 44 01 17 OO ED BO 11 

7F10 18 45 2ft 08 42 CD 42 70 

7F18 E5 CI 2ft Oft 42 CD 87 70 

7F20 CD 42 70 CD 87 70 E5 09 

7F28 CD 42 70 CD 87 70 E 1 B7 

7F30 ED 42 CO 42 70 CD 87 70 

7F38 CE El ED 4B Oft 42 B7 ED 

7F40 42 CD 42 70 C9 06 01 CD 

7F48 ft8 77 CD 29 05 CO E5 21 

7F50 C8 44 06 28 4E CO OE 05 

7F58 23 10 F9 OE OD CD OE 05 

7F60 El ED 5B Oft 42 DF 38 DD 

7F68 C9 22 OE 42 CD 06 7E 21 

7F70 2ft 2ft 22 26 44 CD 3F 02 

7F78 3E 55 CD OB 7D 21 E8 41 

7F80 06 06 7E FE 20 30 02 3£ 

7F88 20 CD OB 7D 23 10 F3 CD 

7F90 2F 7E 3E 3C CO OB 7D 78 

7F98 CD OB 70 7D CD OB 7D 7C 

56 7FftO CD OB 7D 85 4F 7E CD OB 



7FA8 70 81 4F 23 10 F7 CD 20 

7FB0 7D ED 5B Ofl 42 DF 38 D7 

7FB8 3E 78 CD OB 7D 2A OC 42 

7FC0 7D CD OB 7D 7C CD OB 7D 

7FC8 C3 BO 7B FF FF FF FF FF 

7FD0 FF FF FF FF FF FF FF FF 

7FD8 FF FF FF FF FF FF FF FF 

7FE0 FF FF FF FF FF FF FF FF 

7FE8 FF FF FF FF FF FF FF FF 

7FF0 FF FF FF FF FF FF FF FF 

7FF8 FF FF FF FF FF FF FF FF 
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Ein Hi I fsprogramra fuer Kassettenbenutzer 

TAPE-EDITOR 



Loading TAPEDI *P 

LENGTH O^ PROGRAM 09C9. ENTRY 50FB. 

SYSTEM-TfiPE COPV & EDITOR Ccl 1983 

written by Ouergen Buchmuel ler 

L-LOAD S-SAVE M-MERGE E-EDIT A-SCHUTZ 

B-BASIC N-NAME C-CHANGE ENTRY 

Cnmmand 7 



4800 0302042595445532046524F4D204 1 44 

4810 52455353203O3030302E20434845434B 

4820 53554D20303020204C454E475448204F 

4830 462050524F47524 1 4D20303030302E20 

4840 454E54525920303030302E2020202020 

4850 4C6F6164696E6720536176696E672020 

4860 4D6572676520746F204F6C64204E616D 

4870 65202E2E2E2E2E2E204E6577204E616D 
80 BYTES FROM AORESS 4800. CHECKSUM F6 

4800 00 BYTES FROM ADRESS 0000. CHECK 

4820 SUM 00 LENGTH OF PROGRAM 0000. 

4840 ENTRY 0000. Loading Saving 

4860 Merge to Old Name New Nam 



An den obigen Bildschirmausdrucken konnen Sie schon ungefahr 

erkennen, was Ihnen der "Tape-Editor" bietet. 

Sie konnen mit lhm SYSTEM-Bander laden, abspeichern und mehrere 

SYSTEM-Bander zu einem Program zusammenf assen . 

Der Name und die Startadresse des zu schreibenden Bandes konnen 

geandert werden. 

Desweiteren konnen die Programme vor dem Abspeichern in 

hexadez linal Oder ASCII editiert werden, wobei Sie sogar Blocke 

loschen oder einfugen konnen. 

Ferner bietet der Tape-Editor die Mogl lchhei t . Bander geschutzt 

aufzuzeichnen , d.h. das Progromm wird mit einem AUTO-Start 

versehen, der Video-DCB wird 'verbogen' (dam it lasst sich das 

Band mit einem Monitor nicht mehr laden) und die RST-Tasten 

werden desakt i vier t . 

Alles in al lem ein sehr nutzliches Prograirim fur Colour-Genie- 

Besitzer, die sich eine Fl oppydiskstat ion noch nicht leisten 

Konnen i 
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Die Bedienung des Tape-Editors 

Das Menue bietet fotgende Befehle: 

(LJoad - Ladt ein Maschinenprogramm von Kassette in den 

Speicher. Dabei wird mcht aur die Or lginal addressen 
geladen, sondern in einen Buffer. So lassen sich 
die Programme auch andern (siehe EDIT), da die Pruf- 
summenbytes ebenfalts lm Buffer stehen. 

(Slave - Speichert eiri in Buffer stehendes Programm wieder 
auf Kassette. Dieser Vorgang kann bel lebig oft 
wiederholt werden. 

CIDerge - Hangt an das in Buffer stehende Proograram ein 
weiteres von Kassette an. Dabei wird als Start- 
adresse fur das homplette Programm die des zuletzt 
angehangten angenommen. Der Name ist der des zuerst 
geladenen Programmes. 

CEldit - Dient zura Verandern eines im Buffer stehenden 
Programmes. Es wird jeweils em Block mit 
zugehoriger Lange und Prufsumme angezeigt. 
Der Edit Befehl hot folgende Sub-Kommandos : 
<CLEAR> dient zum umschalten zwischen Hex-Edit und 

ASCII-Edit . 
<BREAK> dient zum verlassen des Edi t-Bef ehls . 

<F1> loscht den augenbl ickl ich angezeigten 
Block aus dem Buffer. 

<F2> fugt einen Block vor den augenbl lckl ich 

angezeigten ein. Die Adresse und und Lange 
wird gesondert abgefragt und mu(J in der 
Form XXXX.YY emgegeben werde. 

<F3> sucht das Byte u Buffer, das auf die 

angegebene Adresse bei norma I em SYSTEM- 
Befehl geladen wurde. Die Adresse wird 
gesondert abgefragt. 

'RETURNS schaltet einen Block vorwarts. 

Die Prufsumme wird bei jeder Andderunng fur den 
jeweiligen Block neu berechnet und lm Buffer 
abgelegt . 

(Ri Schutz Das im Buffer stehende Programm wird gegen 

unerlaubtes Kopieren geschutzt. kann aber mit 
dem TAPE-EDITOR trotzdem wieder geladen werden. 
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(B)asic - Basic-Warmstart . 

(N)ame - client zum andern des Prograiirvaiens eines 

la Buffer bef indl lcnen Programms. 

(C)hange Entry - client zum andern der Startadresse ernes ira 
Buffer bef indl ichen Programms. Die Adresse 
mup vierstellig eingegeben werden. 

Zu Beginn des Ladevorgangs wird der Name des gefundenen 
Programms angezeigt, nach erfolgtem Laden die Lange des 
Programms und dessen Startadresse. 

Bel einer Fehlerhaf ten Prufsumme, Oder einem falschen 
Blochheader wird die ent sprechende Fehl ermeldung angezeigt. 

Das Programm beginnt bei Adresse 4800H und endet bei Adresse 
5157H. Die Startadresse ist 50FBH. 

Das Listing beginnt auf der folgenden Seite. 



00 



Das Hex-Listing 

48O0 30 30 20 42 59 54 45 53 

4808 20 46 52 4F 40 20 41 44 

4810 52 45 53 53 20 30 30 30 

4818 30 £E 20 43 48 45 43 4B 

4820 53 55 4D 20 30 30 20 20 

4828 4C 45 4E 47 54 48 20 4F 

4830 46 20 50 52 4F 47 52 41 

4838 4D 20 30 30 30 30 2E 20 

4840 45 4E 54 52 59 20 30 30 

4848 30 30 2E 20 20 20 20 20 

4850 4C 6F 61 64 69 6E 67 20 

4858 53 61 76 69 6E 67 20 20 

4860 4D 65 72 67 65 20 74 6F 

4868 20 4F 6C 64 20 4E 61 6D 

4870 65 20 2E 2E 2E 2E 2E 2E 

4878 20 4E 65 77 20 4E 61 6D 

4880 65 20 3F 20 49 6E 73 65 

488S 72 74 20 41 64 72 65 73 

4890 73 2C 42 79 74 65 73 20 

4898 4F 6C 64 20 45 6£ 74 72 

48A0 79 20 30 30 30 30 20 4E 

48A8 65 77 20 45 6E 74 72 79 

48B0 20 3F 20 46 69 6E 64 20 

48B8 50 72 6F 67 72 61 6D 2D 

48C0 41 64 72 65 73 73 20 20 

48C8 3C 02 16 40 00 00 56 00 

48D0 3C 02 16 40 E3 03 3C 00 

48D8 3C 03 E2 41 C3 00 0O 00 

48E0 3C 03 BE 41 C3 00 00 00 

48E8 43 68 65 63 6B 73 75 6D 

48F0 20 45 72 72 6F 72 00 00 

48F8 4E 6F 20 S3 59 53 54 45 

4900 4D 20 54 61 70 65 OD 00 

4908 42 75 66 66 65 72 20 66 

4910 75 6C 6C OD 00 4E 6F 20 

4918 50 72 6.F 67 72 61 60 20 

4920 69 6E 20 42 75 66 66 65 

4928 72 OD 00 53 59 53 54 45 

4930 4D 2D 54 41 50 45 20 43 

4938 4F 50 59 20 26 20 45 44 

4940 49 54 4F 52 20 20 20 28 

4948 63 29 20 31 39 38 33 20 

4950 20 20 20 77 72 69 74 74 

4358 65 6E 20 62 79 20 4A 75 

4960 65 72 67 65 6E 20 42 75 

4968 63 68 6D 75 65 6C 6C 65 

4970 72 20 20 20 20 20 20 20 

4978 20 20 20 20 20 20 20 20 

4980 20 20 20 20 20 20 20 20 

4988 20 20 20 20 20 20 20 20 

4 990 20 20 20 20 20 20 20 20 
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4998 20 20 20 20 20 20 20 20 

49A0 20 20 20 4C 2D 4C 4F 41 

49A8 44 20 20 53 2D 53 41 56 

49B0 45 20 20 4D 20 4D 45 52 

49B8 47 45 20 45 2D 45 44 49 

49C0 54 20 20 41 2D 53 43 48 

49C8 55 54 5ft 42 2D 42 41 53 

49D0 49 43 20 4E 20 4E 41 40 

49D8 45 20 20 43 2D 43 48 41 

49E0 4E 47 45 20 45 4E 54 52 

49E8 59 20 20 20 20 20 20 20 

49F0 20 20 20 43 6F 6D 6D 61 

49F8 6E 64 20 3F 20 00 00 00 

4A00 00 00 00 00 00 00 00 00 

4A08 00 0O 00 F5 OF OF OF OF 

4ftl0 CD 14 4ft Fl E6 OF C6 30 

4A18 FE 3A 38 02 C6 07 12 13 

4ft20 C9 7C CD OB 4A 70 CD OB 

4A28 4ft C9 21 00 FO 06 10 C5 

4A30 06 06 36 02 23 10 F8 06 

4ft38 08 36 08 23 36 08 23 36 

4A40 OB 23 36 OB 23 10 F2 23 

4A48 23 CI 10 E3 06 28 36 04 

4A50 23 10 FB 06 08 C5 06 06 

4ft58 36 02 23 10 FB 06 22 36 

4A60 05 23 10 FB CI 10 EE C9 

4A68 21 00 44 11 01 44 01 FF 

4ft70 03 36 20 ED BO 21 00 44 

4ft78 22 20 40 C9 01 07 00 DD 

4ft80 09 18 OC DD 21 5F 51 DD 

4R88 7E 00 FE 78 CA 05 51 OD 

4ft90 7E 00 FE 3C 28 3E FE 55 

4A98 28 E2 FE 78 28 E5 3E 3C 

4ftft0 OD 77 00 00 46 01 DD 6E 

4ftft8 02 00 66 03 11 OO 48 78 

4AB0 CO OB 4ft 11 15 48 CD 21 

4AB8 4A 7C 85 4F OD E5 El 23 

4ftC0 23 23 23 7E 81 4F 23 10 

4AC8 FA 77 11 24 48 CD OB 4ft 

4ftD0 CD 32 4B C9 DD 46 01 DD 

4ftD8 6E 02 DD 66 03 11 00 44 

4AE0 DO E5 OE 10 CD 21 4ft 13 

4ftE8 13 00 7E 04 CO OB 4FI 23 

4ftF0 05 28 09 00 OD 23 20 Fl 

4ftF8 13 13 18 E6 DD El CD ft3 

4B00 4A DD 46 01 00 6E 02 DD 

4B08 66 03 DD E5 OE 20 CO 21 

4B10 4A 13 13 DD 7E 04 FE 20 

4B18 38 04 FE 80 38 02 3E 2E 

4B20 12 13 23 05 28 09 OD DD 

4B28 23 20 E8 13 13 18 DD DD 

4B30 El C9 11 80 46 21 00 48 

4B38 01 28 OO ED BO C9 CD ED 



4B40 01 77 BE 20 OF 23 32 27 

4B48 44 C9 21 E8 48 18 OD 21 

4B50 F8 48 18 08 21 08 49 18 

4B58 03 21 15 49 11 28 44 ED 

4B60 53 20 40 CD A7 28 CD 82 

4B68 4B C3 08 51 CO 68 4ft 21 

4B70 00 FO 11 01 FO 01 FF 03 

4B78 36 03 ED BO 3E OF CD 33 

4B80 OO C8 21 58 51 11 59 51 

4B88 01 Fl7 6E 36 00 ED BO 21 

4B90 00 00 11 3ft 48 CD 21 4A 

4B98 11 46 48 CD 21 41=1 C9 CD 

4BftO 82 4B CD 6C 4B 21 50 48 

4BA8 11 00 44 01 08 00 ED BO 

4BB0 CD 4C 02 21 58 51 CD 3E 

4BB8 4B FE 55 20 92 It 08 44 

4BC0 06 06 CD 3E 4B 12 13 10 

4BC8 F9 CD 3E 4B FE 78 28 ID 

4BD0 CD 3E 48 47 CD 3E 4B 4F 

4BD8 CD 3E 4B 81 4F CD 3E 4B 

4BE0 81 4F 10 F9 CD 3E 4B B9 

4BE8 28 DF C3 4ft 4B CD 3E 4B 

4BF0 5F CO 3E 4B 57 ED S3 FD 

4BF8 49 22 FF 49 1 1 58 51 B7 

4C00 ED 52 22 01 4ft 11 3A 48 

4C08 CD 21 4fl 2ft FD 49 11 46 

4C10 48 CD 21 4ft C3 08 51 3A 

4C18 58 51 FE 55 C2 59 4B CD 

4C20 SC 4B 21 58 48 11 00 44 

4C28 01 08 00 ED BO 21 59 51 

4C30 01 06 00 ED BO 21 2A 2ft 

4C38 22 26 44 CD 3F 02 21 58 

4C40 51 ED 4B 01 4ft 7E 32 27 

4C48 44 CD IF 02 23 OB 78 Bl 

4C50 20 F3 C3 08 51 3ft 58 51 

4C58 FE 55 C2 59 4B CD 6C 4B 

4C60 21 60 48 11 00 44 01 09 

4C68 OO ED BO 21 59 51 01 06 

4C70 00 ED BO 3E 2D 12 13 CO 

4C78 4C 02 CD ED 01 FE 55 C2 

4C80 4F 4B 06 06 CD ED 01 12 

4C88 13 10 F9 2ft FF 49 2B 2B 

4C90 2B C3 C9 4B 29 29 29 E5 

4C98 29 29 Dl 19 C9 3A 58 51 

4CR0 FE 55 C2 59 4B DD 21 58 

4Cft8 51 21 00 00 22 03 4ft 22 

4CB0 05 4fi CD 6C 4B CD 2ft 4A 

4CB8 CD 8F 4ft flF 32 04 4ft CD 

4CC0 (=13 41=1 3f=> 07 4ft B7 C2 OE 

4CC8 4E 3fl 03 4ft E6 OF 4F 3ft 

4CD0 03 4ft E6 FO OF OF OF OF 

4CD8 6F 26 00 CO 94 4C CB 01 

4CE0 06 44 09 01 06 00 09 3fl 

4CE8 04 4ft B7 28 01 23 22 05 

4CF0 4ft 4E 36 Cft CD 49 00 71 

4CF8 FE 08 20 17 3ft 03 4ft B7 

4D00 28 07 3D 32 03 4A C3 BB 

4D08 4C DD 7E 01 3D 32 03 4FI 

4D10 C3 BB 4C FE 09 20 10 3ft 

4018 03 4ft 3C DD BE 01 20 01 

4D20 ftF 32 03 4ft C3 BB 4C FE gg 



4D28 5B 20 lft 3ft 03 4ft D6 10 

4D30 30 0D C6 10 E6 OF 4F DD 

4D38 7E Ol D6 10 E6 FO Bl 32 

4040 03 4ft C3 BB 4C FE Ofl 20 

4048 IF DD 7E 01 B7 3F> 03 4ft 

4050 28 OE 3fl 03 4ft C6 10 DD 

4058 BE 01 38 06 E6 OF D6 10 

4D60 C6 10 32 03 4fl C3 BB 4C 

4068 FE IF 20 OB 3A 07 4 ft EE 

4D70 01 32 07 4ft C3 BB 4C FE 

4078 OD 20 26 CD 6C 4B CD 2ft 

4D80 4ft DD 4E 01 79 B7 20 04 

4D88 06 01 18 02 06 00 03 03 

4D90 03 03 03 DD 09 CD 8F 4fl 

4DS8 21 00 00 22 03 4PI C3 BF 

40fl0 4C FE 01 Cft 05 51 FE 5C 

4DA8 CO 04 4F FE 5D Cft 06 50 

4DB0 FE 5E Cft 84 50 FE 30 DA 

4DB8 BF 4C FE 47 D2 BF 4C FE 

4DC0 41 30 07 FE 3ft 38 03 C3 

4DC8 BF 4C 77 D6 30 FE Oft 38 

4DD0 02 D6 07 4F 3ft 04 4ft B7 

4DD8 28 OB 3E FO CD FO 40 CD 

4DE0 8F 4ft C3 17 4D CB 09 CB 

4DE8 03 CB 09 CB 09 3E OF CD 

4DF0 FD 4D 3E 01 32 04 4ft CD 

4DF8 8F 41=1 C3 BF 4C 2ft 03 4ft 

4E00 26 00 DD E5 Dl 13 13 13 

4E08 13 19 ft6 Bl 77 CS 3fl 03 

4E10 4ft E6 IF 4F 3ft 03 4ft E6 

4E18 EO 07 07 07 6F 26 00 CO 

4E20 94 4C 06 44 03 01 ft£ 02 

4E28 09 22 05 4ft 4E 36 Cft CD 

4E30 49 00 71 FE 08 Cft FC 4C 

4E38 FE 09 CA 17 4D FE 5B Cft 

4E40 2B 40 FE Oft Cft 49 4D FE 

4E48 IF Cft 6C 4D FE OD Cft 7B 

4E50 4D FE 01 Cft 05 51 FE 5C 

4E58 Cft ft4 4F FE 5D Cft 06 50 

4E60 FE 5E Cft 84 50 4F 77 2ft 

4E68 03 4ft 26 00 OD E5 Dl 13 

4E70 13 13 13 19 71 CD 8F 4ft 

4E78 C3 17 4D 3ft 58 51 FE 55 

4E80 C2 59 4B 21 FF BF ED 5B 

4E88 FF 49 B7 ED 52 11 28 00 

4E90 ED 52 DPI 54 4B 21 F8 BF 

4E98 11 5E 51 B7 ED 52 E5 CI 

4EA0 21 F8 BF 11 FF BF ED B8 

4Eft8 11 5F 51 21 C8 48 01 07 

4EB0 00 ED BO 2ft FF 49 1 1 04 

4EB8 00 19 E5 E5 Dl 13 1ft 32 

4EC0 DD 48 32 E5 48 13 1ft 32 

4EC8 DE 48 32 E6 48 4F IB 1ft 

4ED0 81 4F C6 E6 32 DF 48 79 

4E08 C6 C2 32 E7 48 2ft DD 48 

4EE0 22 FD 49 Dl 21 DO 48 01 

4EE8 07 00 ED BO 21 D8 48 1 

4EF0 10 00 ED BO EB 36 78 23 

4EF8 36 00 23 36 00 23 22 FF 

4FO0 49 11 58 51 B7 ED 52 22 
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4F08 01 4A C3 05 4C 3ft 58 51 

4F10 FE 55 C2 59 4B CD 6C 4B 

4F18 11 00 44 21 69 48 01 IB 

4F20 00 ED BO ED 53 20 40 1 1 

4F28 09 44 21 59 51 01 06 00 

4F30 ED BO 21 OO 42 06 06 E5 

4F38 C5 36 20 23 10 FB CI El 

4F40 CD 40 00 11 59 51 06 06 

4F48 7E FE 20 30 02 3E 20 12 

4F50 23 13 10 F4 C3 08 51 3A 

4F58 58 51 FE 55 C2 53 4B CD 

4F60 6C 4B 2A FF 49 26 56 2B 

4F68 5E EB 11 A2 48 CO 21 4A 

4F70 11 00 44 21 98 48 01 1ft 

4F78 00 ED BO ED 53 20 40 21 

4F80 00 42 06 04 CD 40 00 06 

4F88 04 CD F2 50 2A FF 49 2B 

4F90 72 2B 73 EB C3 OE 4C 7E 

4F98 23 D6 30 FE OA 38 02 D6 

4FA0 07 E6 OF C3 DD 4E 01 06 

4Fft8 00 79 B7 20 01 04 03 03 

4FB0 03 03 03 OD E5 El 22 09 

4FB8 4A 09 22 05 4ft 2A FF 49 

4FC0 AF £D 42 22 FF 49 21 FF 

4FC8 BF AF ED 4B 05 4ft ED 42 

4F00 E5 CI 2ft 05 4ft ED 5B 09 

4FD8 4ft ED BO 2ft FF 49 1 1 58 

4FE0 51 ftF ED 52 22 01 4ft 11 

4FE8 3ft 48 CD 21 4A DD 7E 00 

4FFO FE 78 28 12 CD 6C 48 CD 

4FF8 in 4ft 21 00 00 22 03 4ft 

500O CD 8F 4ft C3 BF 4C CD 6C 

5008 4B 21 84 48 11 00 44 01 

5010 14 00 ED BO ED 53 20 40 

5018 21 00 42 06 07 CD 40 00 

5020 CD F2 50 ED 53 05 4ft 23 

5028 CD E5 50 32 OB 4ft 4F 06 

5030 00 B7 20 01 04 03 03 03 

5038 03 03 21 FF BF ftF ED 42 

5040 22 09 4fl ED 5B FF 49 DF 

5048 Dft 54 4B 2ft FF 49 09 22 

5050 FF 49 2ft 09 4A DD E5 CI 

S058 ED 42 E5 CI 03 11 FF BF 

5060 2ft 09 4ft ED B8 2A 05 4fl 

5068 3ft 08 4ft DD 77 01 DD 75 

5070 02 DD 74 03 DD E5 El 23 

5078 23 23 23 47 36 00 23 10 

5080 FB C3 DB 4F CD 6C 4B 11 

5088 00 44 21 B3 48 01 14 OO 

509O ED BO ED 53 20 40 21 00 

5098 42 06 04 CD 40 00 CD F2 

50A0 50 FD 21 5F 51 FD 7E 00 

S0ft8 FE 78 28 2D FD 46 01 FD 

50B0 6E 02 FD 66 03 DF 28 16 

50B8 23 10 FA FD 4E 01 06 00 
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50C0 79 B7 20 01 04 03 03 03 

50C8 03 03 FD 08 IS D7 FD 7E 

50D0 01 90 32 03 4A FD E5 DD 

50D8 El CD 6C 4B CD 2A 4A CD 

50E0 SF 4A C3 BF 4C CD 97 4F 

50E8 OF OF OF OF 4F CD 97 4F 

50F0 81 C9 CD E5 50 57 CD E5 

50F8 50 5F C9 31 88 42 AF 32 

5100 23 40 CD 82 4B CD 6C 4B 

5108 CD 7C 35 21 28 48 11 78 

5110 44 01 28 00 ED BO 21 2B 

5118 49 11 C8 44 01 D2 00 ED 

5120 BO ED 53 20 40 3E OE CD 

5128 33 00 CD 49 00 FE 45 CR 

5130 9D 4C FE 4C CA 9F 4B FE 

5138 53 CA 17 4C FE 4D CA 55 

5140 4C FE 42 CA 66 00 FE 41 

5148 CA 7B 4E FE 4E CA OD 4F 

5150 FE 43 CA 57 4F C3 2A 51 



per ftu f ban des Inhal tsverzeichmsses einer Diskette 



Da lm folgenden einige Programme gel istet werden. die sicn wit 
dem Inhnl ts verzeichms von Oisketten beschaf t lgen. wollen wir 
Ihrien nun den Aufbou des Inhal tsverzeichmsses etwas genauer 
beschreiben. Wenn Sie dieses Kopitel gelesen und verstanden 
haben. sind Sie in der Lage, zum Beispiel versehent I ich ge- 
loschte Files auf einer Diskette wieder lesbar zu machen und 
vieles ondere nehr : 

Das Inhal tsverzeichnis entspricht praktisch einem normalen Pro- 
gramm und hot also auch einen eigenen Eintrag in Inhal tsver- 
zeichnis, nailich DIR/SYS. 
Dieser File ist 15 Sektoren long, die folgende Bedeutung haben: 

Der erste Sektor enthalt die sogenannte DBT C= Disketten Bele- 

gungs-Tabel le) , 

Die ersten 132 Bytes dieses Sektors entsprechen jeweils einem 

"Lump", einer Zusaimenf assung von raehreren "Granules" C* 5 Sek- 

toren) . 

Wieviele Granules zu einem Lump zusammengef a£t werden, hangt 

von der Speicherkapazit at der Diskette ab. da maximal 192 Lumps 

verwattet werden konnen. 

Nach dem Einschalten ist Ihr Colour-Genie auf 3 Granules pro 

Lump eingestel I t . 

3edes Bit eines Bytes der DBT entspricht nun einem Granule des 

zugehorigen Lumps. Ist das Bit 1. ist das Granule belegt, ist 

es 0. ist das Granule frel. 

Bei 3 Granules pro Lump sind nur die drei Bits ganz rechts 

relevant, die anderen 5 Bits sind immer auf 1 gesetzt . 

Die folgende Tabelle veronschaul icht dies noch etwas: 

Granule Nr . 

76543210 
1 1 1 1 1 x x x 

Ist Bit gesetzt, ist also das erste Granule dieses Lumps be- 
legt. 

Eine normale Colour-Genie Diskette benutzt aber nur 18 Lumps, 
In den restlichen 144 Bytes sind deshalb alle Bits gesetzt, do 
diese Lumps alle unbenutzbar. also "belegt" sind. 

Die Bytes 192 bis 207 werden von Colour-Genie DOS nicht be- 
nutzt . 

In den Bytes 208 bis 215 steht der Name der Diskette, donoch 
folgen 8 Bytes mit dem Datum. 

m 

Die Bytes 224 bis 255 werden nicht benutzt. 



Der zweite Sektor enthalt die sogenannte HIT C= Hash Index 
Tabel le) . 

In dieser Tabel le legt das Bet r lebssyst em den in ein Byte ver- 
schlusselten Programmnamen ob. 

Dies raacht das fluffinden eines best lmmten Namens wesentlich 
einfacher und vor alien Dingen schneller, da nicht standig 
Texte miteinander verglichen werden fliussen. 

Der Aufbau der Tabel le ist auf den ersten Bl lck etwas kompli- 
ziert, er erklart sich jedoch durch die einfache Anwendung. Da 
jeder Eintrag in das Inhal t s verzeichnis 32 Bytes benotigt. pas- 
sen 8 solcher Eintrage in einen Disket tensehtor . 
Die ersten zwolr Bytes der HIT enthalten nun die Hash-Codes der 
ersten Eintrage aus den Inhal tsverzeichms-Sehtoren. Die Bytes 
32 bis 33 enthalten entsprechend die Hash-Codes der zweiten 
Eintrage eines jedes Sektors. 

Ist ein Hash-Code Null, so ist der entsprechende Eintrag nicht 
belegt . 

Eine besondere Bedeutung hat das Byte Nr . 31 Ces enthalt eine 
55 . 

Dieses Byte gibt an. wieviele Sektoren das Inhal t verzeichnis 
belegt. Da mindestens 10 Sektoren Czwei Granules! belegt sein 
mussen. wird aber nur der zusatzlich belegte Platz angegeben, 
also weitere 5 Sehtoren. 



Im dntten bis funrzehnten Sehtoren stehen nun die eigent lichen 

Eintrage fur jedes File. 

Diese bauen sich fol gendermapen auf: 

1. Byte Bit 7=1: Dieser Eintrag ist ein Folge- 

eintrag Csiehe unten) 

Bit 7=0: Dieser Eintrag ist ein Erst- 
eint rag 

Bit 6=1: Dieser File ist ein Systemflle 
Bit 6 « : Dieser File ist kem Systemflle 

Bit 5 : nicht benutzt 

Bit 4 • 1 : Dieser Eintrag ist belegt 
Bit 4=0: Dieser Eintrag ist frei 
tsiehe unten) 

Bit 3=1: Dieser Eintrag ist unsichtbar 
Bit 3=0: Dieser Eintrag ist sichtbar 

Bit 2-0 : nicht benutzt 
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2. Byte Bit 7 ■ 1 : Dieser File darf nicht ver- 

groflert werden. 
Bit 7=0: Dieser File dorf vergroflert 
werden (Normal fal I ) 

Bit 6 : nicht benutzt 

Bit 5=1: Dieses File wurde verandert 
Bit 5 - : Dieses File wurde nicht veran- 
dert 

Bit 4-0 : nicht benutzt 



3. Byte nicht benutzt 



4. Byte Die Position des ersten nicht mehr belegten 

Bytes lm letzten benutzten Sektor des Files 
(Siehe untenJ 

5. Byte Die Record-Lange des Files Cnur wichtig bei 

Benutzung von Random-Access-Fi I es) 

6. bis 13. Byte Filename, linksbundig, aufgefullt mit Leer- 

zeichen 

14. bis 16- Byte Filetyp, linksbundig, aurgefullt mit Leer- 
zeichen 

17. bis 20. Byte nicht benutzt 

21. /22. Byte Fi le-relot i ve Sektornummer des letzten 
benutzten Sektors des Files 

23. bis 30, Byte 4 Byte-Paare, die jeweils einen Bereich auf 
der Diskette beschreiben, der den File zu- 

geordnet is t : 

1, Byte : 

- 255 tOFFH) * Fileende 

- bis 191 C00H bis OBFH) 

Nummer des Lumps, in dem der Bereich 
1 1 eat 
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Byte : 
- Die linhen drei Bits geben an, in 
welchem Granule des Lumps der Bereich 
beginnt . die anderen funf Bits geben 
die finzahl von auf einanderf olgenden 
belegten Granules an (da ein Granule 
inner belegt ist . nufi zu dieser Zahl 
inner 1 addiert werden) 



31. /32. Byte Wenn das 31. Byte eine 254 (OFEH) enthalt. 
stent in 32. Byte die Nummer eines Erweite- 
rungseintrags fur dieses File, sonst ist 
das File zuende. 

Da jedes Bytepaar also maximal 32 Granules C = 40 KBytes) be- 
schreiben kann, kann also jeder Eintrag maximal 128 Granules 
(» 160 KBytes) belegen. Ein langeres File benotigt also mehrere 
Eintroge. Zu diesem Zweck besteht die Moglichkeit. in 32. Byte 
des Eintrags einen Verweis auf einen weiteren, diesem File zu- 
geordneten Eintrag zu geben- Dieser Verweis ist die Nummer, die 
dem entsprechenden Eintrag auch lm HIT-Sektor zugeordnet wurde. 
also <Position inn Sektor> * 32 + Sektornummer . Ein solcher Er- 
wei terungseint rag sieht etwas anders aus, als ein Ersteintrng: 

1. Byte Bit 7 und Bit 4 sind 1, alle anderen Bits 

sind Nul I 

2. Byte Ruchverweis auf den vorhergegangenen Ein- 

trag. Auf diese Weise ist eine Ruckverket- 
tung mogl ich . 

3. bis 22. Byte nicht benutzt 

23. bis 32. Byte wie die entsprechenden Bytes lm Ersteintrag 

Besonders wichtig ist die Tatsache. dap bei Ausfuhrung des 

KILL-Befehls nur alle Hash-Codes aller zu diesem File gehoren- 

den Eintrage in der HIT auf Null gesetzt werden und in jedem 

Eintrag das Bit 4 des ersten Bytes zuruckgesetzt wird. Ein ver- 

sehentlich geloschtes Programm kann also wieder"gefunden" wer- 

den. 

Hierzu ist es nur notig. in alien Eintragen das Bit 4 im ersten 

Byte zu setzen und an den entsprechenden Stel len in der HIT 

Mieder den Hash-Code des Filenamens einzutragen. Dies konn zum 

Beispiel mit COLZftP geschehen. 

Der Hash-Code eines Filenamens wird f ol gendermapen berechnet: 

1. Der Filename mu(3 wie im Inhal tsverzeichnis vorliegen, also 
Name und Extension linksbundig und mit Leerzeichen aufge- 
ful I t . 



READ 


ME 


COL ZAP 


CtID 


EMPIRE 



Hier einige Beispiele dszu: 

Name : READ/ME Umgewandel t : 

Name : COLZAP/CMD Umgewandel t .• 
Name : EMPIRE Umgewandel t : 

Ein umgewandel ter Filename ist also inner H Zeichen long. 
Die Berechnung des Hash-Codes fur diesen Namen geschieht nun 
f ol gendermapen: 

1. Zeichen * 2 XOR 2. Zeichen * 2 XOR 3. Zeichen * 2 ... 

Menn das Ergebnis dieser Rechnung Null ist, wird 1 als Hash- 
Code genommen. da Null ja die Kennung eines freien Eintrags 
ist. 

Hier elnige Beispiele fur Hash-Codes: 

Name : READ ME Hash-Code : 60H = 96 

Name : C0L2AP CMP Hash-Code : FOH = 240 

Name : EMPIRE Hash-Code : 49H = 73 

Folgendes kleine BASIC-Programm berechnet den Hash-Code 

eines beliebigen Filenamens: 

6eben Sie zuerst den Nomen ein, dann die Extension. 
Der Hash-Code wird natiirlich in dezlmal ausgegeben; un ihn 
mit COLZflP u.a. einzugeben. miissen Sie ihn noch in das Hexa- 
dezimalsystem umrechnen: 

10 INPUT "Filename ";A$ 

20 INPUT "Extension *' : B$ 

30 R$=A$+STRING$(8-LENCA£) , 32) +B$+STRING$C 3-LENCSil .32) 

40 A = 

50 FOR X=l TO 11 

60 B = FlSCCMID$CA$.X. 1)) 

70 R=CA OR B) AND NOTCft AND Bl 

80 A-2*A 

90 IF A>255 THEN A^A-255 
100 NEXT X 
110 IF A=0 THEN R=l 
120 PRINT "Der Hash-Code ist"ifi 
130 GOTO 10 
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0000 
O010 
0020 
0O30 

0040 
OOSO 
0060 

ooro 

0080 
OO90 
00A0 
OOBO 

ooco 



FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFF9F8F8F8F8F8F8F8F8F8 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 
FFFFFFFFFFFFFFFFFFFFFF820000E042 

OODO 5 g74636C6974792032322E30332E3834 

OOEO OOFFFFFFFFF FFFFFFFFFFFFFFFFFFFFF 

OOFO FFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFF 

Drive 0, FRS OOC(0. DRS 0360 DIR/SYS 

0000 

0020 

0040 

O060 

0080 

OOflO 

OOCO 

OOEO . 



| Visktttt*, -&tA4U«.s- TaJot&U 



B Utility 22.03.84 



-* Hit k nutmt 



OOOO A2Ki*3££F045A900004<=l30AE 00000000 

0010 00^0000000TJOO©O«GQQii00000000005 

0020 oa^st^fao^io^ooooooDcooSabTJOooo^*- 

O030 OO^OOOOOOOOOOOTTOOOOaOilOOOOOOOOO 

0040 000O006BOO43000000290000000"O~TOO*- 

0O50 OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO 

0060 OOOOOODDOOE300000000000000000000 

O070 00000000000000000000000000000000 

0080 00000038000000000000000000000000 

0090 OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO 

OOAO 00000000000000000000000000000000 

OOBO 00000000000000000000000000000000 

OOCO 00000000000000000000000000000000 

OODO 00000000000000000000000000000000 

OOEO oooooooooooooooooooooooooooooooo 

OOFO oooooooooooooooooooooooooooooooo, 

Drive 0, FRS 0001, DBS 0361 DIR/SYS 

OOOO o E . . JO 

0020 . Qr . . . . . . i 

0040 . . . K . C . . . J 

0060 

0O80 ... 8 

OOAO 

OOCO 

OOEO 






rleu k - 3woU* - lc*ba//e 
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OOOO (j7j20OO250O5441504544492020434D44 
0010 964236420800UO1FFFFFFFFFFFFFFFF 
0020 102000BC00554852>a4f505920434D44 
0O30 9642964206001740130OFFKFFFFFFFFF 

0O40 oooooooooooooooooooooooootreaoooo 
0050 0000000000000000000000000000001 

O060 00000000000000000000000000000000 
0070 00000000000000000000000000000000 

0080 oooooooooooooooooooooooooooooooo 

0090 00000000000000000000000000000000 
0OF10 OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO 
OOBO OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO 
OOCO 00000000000000000000000000000000 

OODO oooooooooooooooooooooooooooooooo 

0OE0 00000000000000000000000000000000 

OOFO oooooooooooooooooooooooooooooooo 

Drive 0. FRS 0004, DRS 0364 DIR/SVS 

0000 . .M. TftPEDI CMQ B B. . ■ ■ 

0O20 . . .UHRCOPY CMD B B...§.. 

0040 

0060 

0080 

OORO 

OOCO 

OOEO . 



itt X 6m. hu Us jiuu 



* irCB r*-*' "M >ML*t 1> 
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Auf dieser und der vorigen Seite finden Sie mit Kommentaren 
versehene ftusdruche einer Dishet ten-Bel egungs-Tabel le, einer 
Hash- Iridex-Tabel le und eines Eintragssehtors des Inhattsver- 
zeichnisses. Diese Piusdrucke kdnnen Sie zu Hilre nehmen , urn die 
Erklarungen ouf den uorangegangenen Seiten besser zu verstehen. 
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DIRSORT - alphabet isches Sortieren des Inhat tsverzeichmsses 
einer diskette in BASIC 



Es ist Ihnen doch bestimmt schon aufgefallen, welche Schwierig- 
keiten es bereitet. out einer sehr vollen Diskette einen be- 
stimmten Programmnamen zu finden. Es mare doch viel einfacher, 
wenn alte Na-en al phabet isch sortiert waren. 

Ein Program™, das diese ftufgabe fur Sie ubernimmt . finden Sie 
u folgenden beschneben und gelxstet. 

Zeile 10 - 100 ; Iru t lal isierung 

Zeile 110 s N$ enthalt den Filenamen OIR'SYSsd 

Zeile 120 - 200 : Test, ob DIR/SVS auf der Diskette vorhanden 
ist und sich eroffnen la(it 

Zeile 220 : File als Random-Access- Fi le eroTfnen, 
welches nicht erweitert werden darf 

Zeile 230 - 210 : firrays entsprechend der Inhal tsverzeichms- 
gro(ie definieren 

Zeile 250 : Einen Sehtor in 8 Telle je 32 Bytes auftei- 
len 

Zeile 260 - 320 j Eint ragssehtoren einlesen und in 0E$(X) ab- 

legen 

Zeile 330 - 390 : Hash-Codes in HCtX) einlesen 

Zeile 400 - 480 : Zahl von freien. unsichtbaren und SYSTEM- 
Fi les ermi t t el n 

Zeile 490 - 860 ; Inha I t sverzeichmsbeschrei bung ausgeben 

Zeile 870 - 900 s Wenn nach NftME sortiert werden soil, sind 
die Bytes 6 bis 13 relevant, sonst die 
Bytes 14 bis 16 

Zeile SIO -1120 : Sortieren 

Zeile 1130-1380 : Inhal tsverzeichnis zuruckschreiben 

Zeile 1390 : Programmende 
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Probelauf des Directory-Sort ierprogramms < 



Directory vorher: 

>CMD"I1 

NOTNAMED 00/00/00 

F0RTHD/CMD R5232/CMD 

COLCQM/CMO 

PASCAL 

C0LMQN3/CM0 

UHRCOPY/CMD 

COLZAP/CMD 

CCOPY/CMD 

READV 



COLASMD/CMD 

TAPEDI/CMD 

FORTH/CMD 

BflSICPLS/CMD 

PACKER/CMD 

EDITOR/CMD 



BC0DE2/CMD 

ZEICHEN 

C0LM0N1/CMD 

ZEDIT/CMD 

COLOFF/CMD 

C0LMON3D/CMD 

SOUND 



Di rectory -Sort ierprograirim 

Welches Laufwerk soil sortiert werden'? 1 

Directory von Laufwerk 1 

104 Directory-Eintroege : 

81 belegt. 

23 frei. 
2 unsichtbar, 
2 System -Programme 
Noch <NAME> oder <EXT>ension sortieren"' 
NAME 



Directory nachher: 

>CMD"I1 

NOTNFlMED 00/00/00 

BASICPL5/CMD BC0DE2/CMD 

COLASMD/CMD COLCOM/CMD 



C0LM0N3/CMD 

COLZAP/CMQ 

FORTHD/CMD 

RS232/CM0 

UHRCOPY/CMD 

READY 



C0LM0N3D/CMD 

EDITOR/CMD 

PRCKER/CMO 

SOUND 

ZEDIT/CMD 



CCOPY/CMD 

COLhONt/CMO 

COLOFF/CMD 

FORTH/CMD 

PASCAL 

TAPEDI/CMD 

ZEICHEN 
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Programml ist ing: 



10 CLEAR 10000 

20 DEFINT A-Z 

30 CLS 

40 COLOUR 16 

50 PR I NT*'Di rectory -Sort ierprogramm" 

60 PRINT 

70 PRINT 

80 INPUT "Welches LaufwerU soil sortiert werden";A 

90 A=INTCA) 

100 IF A<0 OR A>3 THEN 30 

110 NI-'THR/SYSi" +RIGHT*CSTR$(P|) , 1) 

120 ON ERROR GOTO 170 

130 OPEN "I'M, Ni 

140 CLOSE 

150 ON ERROR GOTO 

160 GOTO 220 

170 PRINT"Lesefehler im Directory 

180 PRINT"Druecken Sie eine Taste," ~ 

190 Z*=INHEY* 

200 IF INKEYJ -"" THEN 200 ELSE 30 

210 RESUME NEXT 

220 OPEN "0", 1 . NS 

230 L=C LOFC l>-2)*8 

240 DIH DEJCL) , HC(L) 

250 FIELD 1. 32 AS H*tl), 32 AS HSC2), 32 AS H*(3), 32 AS H*C4), 32 AS 

H»(5). 32 AS H*C6), 32 AS H*C7). 32 AS H*t85 
260 FOR X = 3 TO LOF( 1) 
270 ON ERROR GOTO 210 
280 GET 1 , X 
290 ON ERROR GOTO 
30O FOR Y-l TO 3 
310 DEt( CLOFC 1)-X)*8+Y)*H*CY) 
320 NEXT Y, X 
330 ON ERROR GOTO 210 
340 GET 1 . 2 
350 ON ERROR GOTO 
360 FOR X=0 TO LOFC13-3 
370 FOR Y=l TO 8 

380 HCCt LOF< 1 ) -3-X) *8+Y) =ASCCrHD*CH$( Y) . X+t, m 
390 NEXT Y, X 
400 FR=0 
410 SS = 
420 IV»0 
430 FOR X-l TO L 

440 IF C ASCCOElCXn AND 161=0 THEN FRsFR+1: GOTO 480 
450 IF ( ASCCDES(X)) AND 128)00 THEN 480 
460 IF C ASCCDEiCX)) AND 64 ) <> THEN SS=SS+1 
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470 IF C flSC(DE$(X)> AND 8)00 THEN IV=IV+1 

480 NEXT X 

490 COLOUR 3 

500 PRINT"Di rectory von Laufwerh "; 

510 PRINT RIGHTKNS. 1) 

520 PRINT 

530 COLOUR 16 

540 COLOUR 2 

560 PRINT USING"»#*";L; 

560 COLOUR 5 

570 PRINT" Directory-Eint raege ; " 

580 PRINT 

590 COLOUR 2 

600 PRINT USING'*#*#";FR; 

610 COLOUR 5 

620 PRINT" be I eg t," 

630 COLOUR 6 

640 PRINT STRINGJE39, 217) 

650 COLOUR 16 

660 COLOUR 2 

670 PRINT USIN3"#*»"iL-FRi 

680 COLOUR 5 

690 PRINT" f>ei," 

700 COLOUR 6 

710 PRINT STRINGIC39, 2173 

720 COLOUR 16 

730 COLOUR 2 

740 PRINT USING"##tt";IV; 

750 COLOUR 5 

760 PRINT" unsichtbar," 

770 COLOUR 6 

780 PRINT STRINGU39. 217) 

790 COLOUR 16 

800 COLOUR 2 

810 PRINT USING"###";SS: 

820 COLOUR 5 

830 PRINT" System-Programme" 

840 COLOUR 16 

850 PRINT 

860 PRINT 

8T0 INPUT "Nach <NAME> Oder <EXT>ension sor t ieren";ft* 

880 IF At="NAME" THEN Sl=6: Ll=8: S2=14: L2=3; GOTO 910 

890 IF Ai="EXT" THEN Sl«14i Ll*3: S2-6: L2-8: GOTO 910 

900 GOTO 490 

910 FOR X=l TO L-l 

920 IF C RSC(DEKX)) AND 64 X > THEN 1110 

930 IF ( RSCCDEJKX)) AND 16)=0 THEN 1110 

940 IF C RSC(DE»(Xn AND 128) <>0 THEN 1110 

950 FOR Y = X+1 TO L 

360 IF C RSCCDEKY)) fiNO 64)<>0 THEN 1100 

970 IF ( RSCCDE1CY)) AND 16)=0 THEN 1100 

980 IF C RSCCDEt(Y)) UNO 128)(>0 THEN 1100 

990 Tli-niD*CDE»CX) . SI. LI) 

1000 T2* = MI0tC0EKY) , SI, LI) 
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1010 IF T1KT2J THEN 1100 

1020 IF T1*>T2S THEN 1010 

1030 IF MI0S(DE$(X) . S2, L2) <=MI0$CDE*C V3 , S2, L23 THEN 1100 

1040 H*=DE*CX> 

1050 H-HCCX) 

1060 DEttX]=DE*(Y) 

1070 DE*CY)=H* 

1080 HCCX)sHC(Y) 

1090 HC(Y1-H 

1100 NEXT Y 

1110 NEXT X 

1120 PRINT "Sort iervorgarig beendet" 

1130 INPUT "Directory zurueckschreiberi" sA$ 

1140 IF A*="N" THEN 1380 

1150 IF ft$<>"3" THEN 1130 

1160 P0KEJ.H400C&H00AF 

1170 P0KE&H400D, 201 

1180 PRINT "PiCHTUNG: Dns Programm darf jetzt nicht" 

1190 PRINT "unterbrochen werden 

1200 ON ERROR GOTO 210 

1210 GET 1 , 2 

1220 ON ERROR SOTO 

1230 FOR X=0 TO LOFCD-3 

1240 FOR Y-l TO 8 

1250 LSET H*CY)-LEFT*CHSCY) . X3+CHRtCHCCC LOFC 1) -3-X)*8+Yn+l"tID$CHSC YD 

, X+2) 

1260 NEXT Y, X 

1270 AD = 2+PEEKC*tH43D0]+256*PEEKC4 1 H43Dl] 

1280 POKE AD, PEEKCAO) OR 1 

1290 PUT 1, 2 

1300 FOR X=3 TO LOFC1) 

1310 FOR Y=l TO 8 

1320 LSET H$CY)=DE*CCLOFC 1)-X)*8+Y) ,_ ^ Im ., 

1330 NEXT Y ' " ' " ' ' " ' ' ' .... 

1340 POKE AD, PEEKCAD) OR 1 

1350 PUT 1 , X 

1360 NEXT X 

1370 P0KEtH400C. 201 

1380 CLOSE 

1390 END 
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Extended Directory 

Ein erweitertes Inhal tsverzeichms in Basic 

Mit diesem Programm konnen Sie mehr der I n f ormat lonen sichtbar 
mochen. die ii» Inhal tsverzeichms jeder Diskette stehen. flus- 
gegeben we r den die Lange ernes jeden Programms in Granules und 
Bytes, die Logische Recordlange und die Position des Fileendes, 
Geben Sie zunachst ein, von welchem Laufwerk Sie das Inhalts- 
verzeichms sehen wollen. Dann konnen Sie eine Maske fur den 
Fdenaien eingeben, falls Sie nur einige Files angezeigt haben 
wollen. Diese Maske sieht prinzipiell f ol gendermapen aus : 

3edes Zeichen der Maske, das kein '">' ist. mup an genau dieser 
Stelle in Filenamen gefunden werden, damit er unter diese Maske 
fallt. An Stelle eines Fragezeichens ist jedes Zeichen zugelas- 
seh. Der Name COLZAP CMD fallt also unter die Maske 
C^L^-^^CD, der Name C0LM0N3DCIM jedoch nieht. Qeben Sie die 
Maske wie einen normaten Filenamen ein. dap Fluffullen mit Leer- 
zeichen geschieht automat isch. Eine weitere Besonderheit ist 
noch zu erwahnen: 

Seben Sie '"/CMD an. so werden nur Files angegeben, deren Name 
zweibuchstabig ist: geben Sie aber */CMD an. so werden alle 
Files, die die Extension CMD haben. angegeben. 

Zum Schlup konnen Sie noch wahlen. ob alle Ausgaben auch auf 
den Drucker gegeben werden sollen. Mit dieser Methode wurde 
auch der Probeausdruck erstellt, den Sie auf der nachsten Seite 
sehen . 

Zeile 10 - 110 : Ini t lal is lerung 

Zeile 120 - 350 : Erstellung der Namens-Maske 

Zeile 360 - 370 : Setzen des Drucherflags 

Zeile 380 - 490 : Einlesen der Inhal tsverzeichniseint rage in 
0E$CX) 

Zeile 500 - 1110 : Heraussuchen der passenden Namen und 

flusgabe der Parameter. Nach 20 Zeilen auf 
Tastendruck warten 

Zeile 1120 - 1490 : Berechnung und Ausgabe von Disket tenname . 
-datum und der Anzahl der freien Granules 

Zeile 1500 - 1520 : Programmende 



Probelauf des Programms "Extended Directory: 



Extended Directory 

Welches Laufwerk"? 1 

Maske des Filenamens'' 

Alle Files 

flusgabe auch auf Drucker C3/N3'' J 

Name EOF LRL Grans Bytes 



BOOT/SYS 


5/000 


256 


1 


1230 


DIR/SYS 


15/000 


256 


3 


3840 


ZEDIT/CMD 


33/136 


256 


7 


8584 


TAPED I/CMD 


8/037 


256 


2 


2085 


UHRCOPY/CMD 


6/188 


256 


2 


1724 


EOIT0R/CM0 


36/229 


256 


8 


9445 


FORTH/CMO 


46/149 


256 


10 


11925 


FORTHD/CMD 


29/042 


256 


6 


7466 


PflCKER/CMD 


18/072 


256 


4 


4680 


RS232/CMD 


1/201 


256 


1 


457 


COLZAP/CMD 


22/092 


256 


5 


5724 


COLMONl/CrlD 


17/072 


256 


4 


4424 


COLM0N3/CMD 


57/088 


256 


12 


14680 


COLM0N3D/CHD 


59/167 


256 


12 


15271 


COLOFF/CMD 


6/159 


256 


2 


1695 


COLCOM/CMD 


60/166 


256 


13 


15526 


BCODEZ/CMD 


11/048 


256 


3 


2864 


CCOPY/CrlD 


2/236 


256 


1 


?4S 


COLflSMD/CMD 


26/179 


256 


6 


6835 


BASICPL5/CnO 


21/102 


256 


5 


5478 


Name 


EOF 


LRL 


Grans 


Bytes 


SOUND 


15/040 


256 


4 


3880 


ZEICHEN 


27/220 


256 


6 


7132 



Disket ten-Name : ROEDEL 
Disketten-Datum : 12/34/56 
29 freie Granules 
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Programml ist ing: 



10 CLS 

20 CLEAR 10000 

30 DEFINT A-Z 

40 COLOUR 16 

50 PRINT"Extended Directory" 

60 COLOUR 5 

70 PRINT STRINGSC18, 217) 

80 COLOUR 16 

90 PRINT 

100 IN PUT "Welches Loufwerk";A 

110 NS="DIR/SYS:" +RIGHTUSTR* t A) , 1) 

120 AS*"" 

130 INPUT"Moske des Filenamens";AS 

140 IF A$ = "" THEN MS-**?????'?'?????": PRINT"AUe Files": SOTO 360 

ISO Ml$="" 

160 M2»="" 

170 FOR X=l TO LENCPiS) 

180 BS=MID*EAS. X, 1) 

190 IF Bt*"/** THEN M1$=M1 S+STRINGS C 8-LENC Ml » ) . 32); X=X+1: GOTO 280 

200 IF BS="*" THEN Ml S-Ml S+STRINGS C 8-LENC Ml SD , "?") : GOTO 250 

210 M1$=M1J+BS 

220 IF X<9 THEN NEXT X: GOTO 350 

230 M1S=LEFTSCM1$. 8) 

240 GOTO 350 

250 X = X+1 

260 IF X<=LEN(AS) AND MIDSCAS. X. 1)<>*V" THEN 250 

270 X=X+1 

280 M2S="" 

290 FOR Y=X TO LENCAS) 

300 BS=MIDS(AS. Y, 1) 

310 IF B*="*" THEN M2S=M2$+STRI NG* C 3-LENC M2S )."?") : GOTO 350 

320 M2S=M2S+BS 

330 IF Y<X+3 THEN NEXT Y* GOTO 350 

340 M2t=LEFTttM2t, 3) 

350 MS-M1S+M2* 

360 INPUT"Ausgabe auch auf Drucker C3/N)":D* 

370 IF DS<>"3" AND DS<>"N" THEN 360 

380 OPEN "D",l, NS 4 . 

330 L=C LOFC l)-2)*8 

400 DIM DES(L) . HS(8) 

410 FIELD 1, 32 AS HS(l), 32 fiS HSC2). 32 AS H»(3), 32 AS H$C4), 32 AS 

H*C5). 32 AS Ht(6), 32 AS HSC7), 32 RS HSC8) 
420 FOR X-3 TO LOFC 1) 
430 ON ERROR GOTO 1530 
440 GET 1 . X 
450 ON ERROR GOTO 
460 FOR Y=l TO 8 
470 DE$C CX-3)*8+Y)=HSCY) 
480 NEXT Y 
490 NEXT X 
500 X=l 
510 CLS 
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520 C=0 

530 XS="Name EOF LRL Grans Bytes" 

540 PRINT X* 

550 IF Ot="0" THEN LPRINT X* 

560 COLOUR 5 

570 PRINT STRINGSC39, 217) 

580 COLOUR 16 

590 IF DS="J" THEN LPRINT STRING* C 39 , "- " ) 

600 J %m" '>'>'>'>'> ttt/t'7'r xxxx/xxx xxx xxx xxxxxx" 

610 D=flSCCDE*CX) ) 

620 IF CD AND 1283 <>0 OR CD AND 16: =0 THEN 1 ! 00 

630 Rl-MIDICDEICX) . 6. 11) 

640 FOR V=l TO 11 

650 IF MIDSCM$, Y, 13='"?" THEN 670 

660 IF MIDKMS, V, 1)<>MIDSCR», Y, 1) THEN 1100 

670 NEXT Y 

680 Rli = **** 

690 FOR Y-l TO 8 

700 IF MID1CRS, Y. Do" ** THEN Rl *=R1 J+MID* C RS , Y, l)t NEXT Y 

710 R2$="" 

720 FOR Y=9 TO 1 1 

730 IF MIDStR*. Y. DO" " THEN R2t = R2S+MID*<:RS . Y, D: NEXT Y 

740 R*=R1$ 

750 IF R2*<>"** THEN R* = R*+*V" +R2$ 

760 Rt=RS+STRING*C 12-LENCR*), 32) 

770 fllDKTl, 1 , 12)=R* 

780 B=RSCCMIDtCDESCX) , 4, ID 

790 Z=B 

800 R$=RIGHTi(STR»(B) , LENC STR* C B) ) - D 

810 R* = STRING*(3-LENCR») . 48DR* 

820 MID$CT$. 19, 3)=Rl 

830 B=ASC(MID*CDE*CX) . 5. ID 

840 IF 6 = THEN B = 256 

850 R*=RIGHT$CSTR*(B) , LENC STR* C BD - D 

860 R*=STRINGSC3-LEN(R») , 32)+R4 " " 

870 HIDXTS, 23, 3)=RS 

880 e-ASCtMID*COe*CX) . 21. l))+256*ASCCttID*CDE*CX) , 22, ID 

890 R*=RIGHT$CSTR*CB) . LENC STRt(B) ) - D 

900 RS-STRINGt(4-LENCRID 32)+R* 

910 M1DKTI, 14. 4)=RS 

920 F=B+SGNCZ) 

930 GR=INT(F/5)+SGN(F-INTCF/5)*5) 

940 RS=RIGHTSCSTR*CGR) . LENC STRS C GR) ) - D 

950 R*=STRING*C3-LEN(R*) , 32)+RS 

960 MID1CT*. 28, 3) =RS 

970 KB=B*256+Z 

980 R$=RIGHT$(STRtCKB) . LEN(STR*( KBD - D 

990 Rt=STRING*C6-LEN(RS) , 32)+R* 

1000 MIOtCT*. 33, 6)=RJ 

101O PRINT T* 

1020 IF Dt="Cr THEN LPRINT Tl 

1030 C=C+1 

1040 IF C<20 THEN 1100 
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1050 COLOUR 5 

1060 INPUT"<RETURN> zun Fort fahren";X* 

1070 COLOUR 16 

1080 X = X+1 

1090 IF X<=L THEN 510 

1100 X=X+1 

1110 IF X<=L THEN 610 

1120 FIELD 1, 96 AS GTS , 112 AS DUMMY! , 8 AS NMJ , 8 AS DTt 

1130 ON ERROR GOTO 1530 

1140 GET 1 . 1 

1150 ON ERROR GOTO 

1160 CLOSE 

1170 FR=0 

1180 W=l 

1190 PRINT 

1200 COLOUR 2 

1210 PRINT"Bitte einen Moment marten" 

1220 COLOUR 16 

1230 PRINT 

1240 G=ASCCMID*CST$, W. 1 )) AND 7 

1250 FOR Y=l TO 3 

1260 Gl=INTCG/2) 

1270 G2=G-Q1*2 

1280 FR=FR+1-G2 

1290 G=Q1 

1300 NEXT 

1310 W*W+1 

1320 IF W<97 THEN 1240 „. . , ***»B~ 

1330 PRINT "- -' * 

1340 IF D$="0" THEN LPRINT 

1350 PRINT "Oisket ten-Nome ; "; 

1360 COLOUR 5 

1370 PRINT NM* 

1380 COLOUR 16 

1380 IF 0*="J" THEN LPRINT"Dlsket ten-Name : ":NMI 

1400 PRINT "Disketten-Datum: ": 

1410 COLOUR 5 

1420 PRINT DTS 

1430 IF DS="0" THEN LPRINT"Disket ten-Oat um : ":DT* 

1440 COLOUR 16 

1450 PRINT"Freie Granules;"; 

1460 COLOUR 5 

1470 PRINT USING"##*#";FR 

1480 IF D$="y THEN LPRINT USIN6"»###" ; FR ; : LPRINT" frele Granules' 

1490 CLOSE 

1500 PRINT 

1510 INPUT"<RETURN> fuer Neustart ";A$ 

1520 RUN 

1530 RESUME NEXT 



Umbenennung von Disketten 

lilt diesem Uleinen Bas ic-Programm hdnnen Sie endl ich Ihren 
Disketten sinnvolle Nanen geben, anstatt dem langweil igen 
NCW 1383. Starten Sie das Programm und geben Sie an. in welchen 
Laufwerk sich die Diskette befindet, deren Namen Sie andern 
wollen. Dann werden der bisherige Name und das Datum ausgege- 
ben. Nun honnen Sie einen neuen Namen und ein neues Datum an- 
geben. Driicken Sie nur <RETURN>. so wird der alte Wert ULernon- 
raen. Danach wird das Inhol ts verzeichnis zuruckgeschr ieben. 

Programml isting; 



10 CLS 

20 COLOUR 16 

30 PRINT"Disket ten Umbenennung" 

40 INPUT"Welches Laufwerk ";<=l 

50 NS="OIR/SYS: " +RIGHTSCSTRK R 1 , 11 

60 0P£N"d". 1 , Nt 

70 FIELD 1. 208 AS DUMMY*. 8 AS Nli* . 8 flS DT$ 

80 ON ERROR GOTO 120 

90 SET 1 . 1 

100 ON ERROR GOTO 

110 SOTO 130 

120 RESUME NEXT 

130 FRINT"LaufwerU Nr. ";RI8HT$CNS, 1) 

140 PRINT 

150 PRINT"Name : ";NM$; TABC 20) ; "Datura : ";DTI 

160 R*="" 

170 INPUT"Neuer Name ";flS 

180 IF AJO"" THEN LSET NliJsflS 

190 fl»="" 

200 INPUT"Neues Datum ";fl$ 

210 IF Rio"" THEN LSET DTJ=A$ 

220 AD=2+PEEK(i.H43D0)+256*PEEKC&H43Dn 

230 POKE RD. PEEKCAD)OR 1 

240 PUT 1 . 1 

250 CLOSE 

260 END 
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ftnhang ft; Basic-Token Listt 



Basic Eint -achtol en; 



f 



iff 



hND 



IHT 
FPE 

POS 
PtiD 
EXP 
SIM 
hTN 
CVI 
CVD 
LOC 

tin* 

MKD* 
CSNG 

fix 

STR* 
hSC 
LEFT* 
1110* 



1 29 
1 31 
1 33 
1 35 
1 37 
1 29 
1 41 
1 43 
1 45 
1 4"> 
1 49 
1 51 
153 
155 
15? 
159 
161 
163 
165 
16? 

ffl 

1 73 
1 ""5 
1 77 
1 79 
1S1 
1 33 
1S5 
1 S^ 
1 89 
1 91 
1 93 
1 95 
1 97 
1 99 

£01 

m 

£99 
£1 i 
£1 3 
£15 
£17 
£19 

££1 
££3 
285 
£27 
££9 
£31 
£33 
£35 
S3"" 
£39 
£41 
£43 
£45 
£47 
£49 
£51 



□ 



S 

5 



FOP 

SET 

CMD 

NE^T 

IHPUT 

READ 

GOTO 

IF 

GOSUB 

PEM 

tp-Sff 

DEFINT 

DEFDBL 

EOIT 

RESUME 

ON 

FIELD 

PUT 

LOrtD 

NAME 

LSET 



AVE 

PPINT 

OKE 

OUT 

LIST 

ll T 

LuhD 

EW 



SING 

SP 

PP 

NSTP 

IME* 

H K E Y * 

OT 



R 



GN 
ES 
NP 



SQR 

LOG 

COS 

ThN 

PEEt 

CVS 

EOF 

LOF 

Mrs* 

C INT 

CDBL 

LEN 

VAL 

CHP* 

RIGHT* 
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Col our -Easi 


c Doppe 


1 tokens 






£55 


1 28 *! 


COLOUR 


£55 


1 £9 


r 


F C L U R 


255 


1 30 J 


KEYPAD 


£55 
£55 


1 31 


L 


3 Y 


£55 


1 3£ I 


PLOT 


1 33 


¥ 


FOR 


£55 


1 31 * 
1 36 — 


LGR 


£55 


1 35 


w 


FCL5 


£55 


PLHY 


255 


1 37 


L 


C IRCLE 


£55 


1 38 I 


SCALE 


255 


t 3? 




SHAPE 


£55 


119 


NSHAPE 


£55 


1 11 


D 


XSHAPE 


£55 


1 12 T 


PRINT 


2 55 


1 13 




CPOIHT 


£55 


f 11 I 


M P L T 


£55 


1 15 


UM 


S U H D 


£55 


1 16 f 


CHAR 


£55 


1 1? 


3 


R E N U M 


2 55 


1 13 V 


SWAP 


£55 


1 19 


FKEY 


£55 


150 f 


CALL 


£55 
£55 


1 51 


J 


VERIFY 


£55 


1 5£ ■ 


EGRD 


1 53 


M B 6 R D 



86 



flnhang B; Dezimnl-. Hexadezimal - , ASCI I-Tabel le 



0. 

6 
9 
t £ 
15 
1 8 
£1 
£4 

M 

33 
3b 
39 

ts 

45 
43 
51 
54 
5"' 
60 
63 
66 

69 
72 
75 
78 
81 
84 
87 



\% : 



96 
99 
10£ 
1 05 
1 08 
1 1 1 
1 1 4 
1 1 "■ 
1 £0 
1 £3 
1 26 
1 £9 
13£ 
1 35 



1 33 
1 41 
1 44 
' 14"* 
150 
1 53 
1 56 
1 59 
1 6£ 
1 65 
1 68 
1 "M 
1 ^4 
1 "■? 
1 86 
1 83 
1 86 
1 39 
1 9£ 
1 95 

£01 
£64 



06h 
09h 
0Ch 
0Fh 

i £^ 

1 5h 
1 8h 
1 Bh 
1 EH 
£1 H 
£4H 
£7H 
£AH 
£DH 
3@H 
33H 
36H 
39H 
3CH 
3FH 
4£H 

45H 
48H 
48H 
4EH 
51 H 
54H 
57H 

5DH 
60H 

= 63H 

= 66H 

= 69H 

= eCH 

= fiF"H 

= 7£H 

= T5H 

= ~"8H 

= 7BH 

= 7EH 

- 81H 

= S4H 

= S^H 



SUH 
3DH 
90H 
93H 
96H 
99H 
?CH 
9FH 
rt£H 
h5H 
rtSH 
hBH 
AEH 
61 H 
B4H 
B^H 
BhH 
BOH 
C8H 
C3H 
C6H 
C9H 
CCH 



4 = m 





■7 

6 
9 

< 



-} 
1 
1 3 
1 6 

1 9 

dd 
£5 
£8 
31 
34 
3" 1 
40 
43 
46 
49 
5£ 
55 
58 
61 
64 

"■0 

76 

7Q 

82 
85 
S8 
91 
94 
97 
1 00 
03 
06 
09 
1 £ 
1 5 
1 8 

£1 
£4 

M 

33 
36 



3 q 
4£ 
45 
48 
51 
54 
57 
6u 
63 

6b 

69 



'5 = 



81 
34 
8- 

93 
9^ 
9 9 
£0£ 
£05 



07H 
OhH 
0DH 
1 OH 
1 3H 
1 6H 
1 9H 
1 CH 
1 FH 
££H 
£5H 
£8H 
£BH 
£EH 
31 H 
34H 
3^H 
3hH 
3DH 
40H 
43H 



L 

R 



46H F 
49H I 
4CH ' 
4FH 
5£H 
55H U 
5SH " 
5BH 
5EH 
61 H 
64H 
67H 
6hH 



= 60H m 



"0H 

'3H s 

79H y 
7CH r 
"TH ■ 
3£H 
85H 
S8H 



8BH 
8EH 
91 H 
94H 
9""H 
9hH 
9DH 
H0H 
h3H 
h6H 
H9H 
hCH 
hFH 
B£H 
B5H 
B8H 
BBH 
BEH 
CI H 
C4H 
C^H 
ChH 
CDH 



8 
1 1 
1 4 
1 7 
£0 
£3 
26 
£9 
3£ 
35 
33 
41 
44 
4^ 
5G 
53 
56 
59 
6£ 
65 
6S 

71 
74 

SO 

0-7 

V J 

86 
89 

gp 

95 

S a 

1 01 

1 04 
10-" 

1 1 

1 1 3 

1 1 6 

1 1 9 

1 2£ 

1 £5 

1 £8 

1 31 

1 34 

1 3 -1 



1 40 

1 43 

1 46 

1 49 

1 5£ 

1 55 

1 58 

1 61 

1 64 

1 6~> 

1 ^>0 

1 ^3 
1 76 
1 ~>9 
1 8£ 
1 8T 



m 

0SH 
0GH 
0EH 
1 1H 
1 4H 
1 7H 
1 AH 
1 DH 
£0H 
£3H 
£6H 
£9H 
£CH 
£FH 
3£H 
35H 
3SH 
3BH 
3EH 
41H 
44H 



B 

e 
h 



= 4^H 6 

= 4AH 3 

= 4DH M 

= 50H P 

= 53H S 

= 56H V 

= 59H Y 

= 5CH ^ 

= 5FH 

= 6£H 

= 65H 

= 68H 

= 6BH 

= 6EH n 

= 7 1 H q 

= ^4H t 

= 7 7 H w 

= 7hH z 

- 7DH > 

= 80H 

= 83H 

= 86H 

= 89H 



8CH 
SFH 

9£H 
95H 
98H 
9BH 
9EH 
f)1 H 
h4H 
(fH 
nAH 
hDH 
B0H 
B3H 
B6H 
B9H 





1 33 

1 91 


~ 


BCH 
BFH 




SE 


1 ^4 


= 


l£H 


* 


& 


1 Q_> 


= 


C5H 


M 


£00 


= 


C8H 


j 


3 


dU3 


= 


CBH 


20b 


= 


CEH 



87 



m 


-. 


6IH 


1 

1 


i?? 


= 


e^ 


9 


= 


£y? 

ET £ 
£1 5 


gi^ 


= 


D5H 


21 4 


= 


D6H 


■■ 


216 


= 


DSH 


21 7 


= 


D5H 




£1 8 


£15 


^ 


DEH 


1 


££B 


= 


DC 


K 


/,■ 


££i 


£££ 


=i 


DEH 


Ss 


££3 


= 


OFH 


i 


££4 


£25 


= 


El H 


k 


aae 


u 


E£H 


££? 


£23 


^ 


E4H 


££9 


n 


E5H 


£30 


£31 


=: 


E7H 


^ ^ ■*■ 
tic 


= 


E8H 


1 


233 


£34 


It 


EAH 




£35 


= 


EBH 


6 


£3fe 


£3? 


= 


EDH 


1 


£3S 


= 


EEH 


i 


£3y 


£40 


= 


F@H 


£41 


= 


F1 H 


K 


£4£ 


£43 


= 


F3H 


# 


£44 


= 


F4H 


* 


£45 


£46 


= 


F€H 




£4? 


= 


F7H 




£43 


£49 


= 


F9H 


".* 


£50 


= 


FAH 


I 


£51 


£5£ 


= 


FCH 




£53 


= 


FDH 


£54 


£55 


= 


FFH 


4 















m 

D7H 
DhH 
ODH 
EQH 
E3H 
E6H 
E9H 
ECH 
EFH 
F£H 
F5H 
FSH 
FBH 
FEH 



I 

i 

I 
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Anhang C: Software! iste 



Colour— Gen is 

Software 









fl&V 



A* 



^* fc V, 



a>\ 



^Al>^ 



co-^^ \ tfSSS^ 



«*• 'l ^ J " . ^ 






»^^:; ^«^,^ 






°»-V 






4* 

® 






■s 



c * 



^ 









«„ °< 



Q '*> 



S3 "^ 
*5 *& 



* 



* 



* 



*V 



<o% 



°0^ 



* 



H. 





K**KK*1HUt*K***KKKK)HHHHtMKKKK*******»»*KttXKKK***KKtt**Ktt**K*ttK*fc* 

Verzeichnis der verfiigbaren Colour-Genie-Software 

K*************M**tt*K***X*X**X*ttKM*X*X*XX***************XN*tt»**K 

1.3 H ILFSPROGRflMME „ 

PROGRFIMM I ERSPRACHEN 

COLOUR-COMPILER! Dieses Programa 1st ex t rem wertvoll. Es bietet 

die MOglichkeit. Basicprogramme in Maschinenspracheprograaae zu 

iibersetzen. 

Der wesentliche Vorteil: Ihr Programm Ifiuft nach Coapilierung 

c.a. 40 mal C) schnel ler . 

Dies geschieht interaktiv, d.h. Basicprograaa, Maschinen- 

prograaa und Compiler stehen gleichzeitig ia Speicher. was ein 

sehr schnel I es Arbeiten eraoglicht. Dabei konnen c.a. 9.5 kByte 

Basicprograaa verarbeitet werden. V/erzichtet wan auf die 

hochauf losende Qrafik. steht noch aehr Speicher zur Verfiigung. 

Voraussetzung: Ihr COLOUR-GENIE MUSS AUF 32K RAM ERWE1TERT 

SEIN. Die aeisten Colour-Basic-Befehle werden vom 

Colour-Coapi ler unterstiitzt . Die wesent I ichste Einschronkung 

1st , dap der Colour-Coapi ler nur Ganzzahlen (Integers} 

verarbeitet. 

Preis: 69.- OM Diskversion: 95.- DM 

COL OUR -MONITOR I: Ein Maschinenspracheaonitor ait starkea 
Befehlssatz. z.B. Disasseal ieren. Ascit/Hex-Ouap, Bander 
laden/schreiben. Bytes sue hen. Speicher editieren/verschieben/ 
relozieren. Hex/Deziaal-Uawandlung u.a.a. 
Preis j 39.- DM 

COLOUR- ASSEMBLER: Mit diesea Prograaa konnen Maschinensprache- 

prograaae auf koafortable Meise entwickelt werden. Das 

Prograaaieren geschieht ait Z80-Mneaonics . Labels etc. 

Der Asseabler erzeugt dann das Maschinenspracheprograaa. das 

zur Probe ouch direkt ausgefiihrt werden kann. 

Eine weitere Besonderheit des Assemblers ist , daP der 

Asseabler-Text im ganz noraalen Basic-Modus erzeugt wird. 

so dap alle Basic-BeTehle wie EDIT, LLIST, CSAVE voa Asseabler 

ausgenutzt werden. 

Preis: 63.- DM 

SOUND-EDITOR ( auch ii Handbuch "Colour Basic leicht gelernt" 
aufgelistet} : Ein niitzliches Hi I fsprograii zur Prograamierung 
des PS6-ICs (Sound-ChipD . Sie edit ieren die PSG-Register auf 
dem Bildschira und der entsprechende Ton wird gleichzeitig 
ausgegeben. Abschl iepend gibt das Prograaa alle PSG-Register- 
inhatte in deziaaler Schreibweise aus . 
Preis: 25.- OM 

ZEICHEN-EDITOR (auch im Handbuch "Colour Basic leicht gelernt" 
aufgelistet) : Dieses Prograaa ermoglicht ea, 64 der 128 Trei 
def inierbaren Zeichen auf dea Bildschira ubersicht 1 ich zu 
edit ieren. Es konnen auch Graf iken, wie z.B eine Schreib- 
schrift, erstellt werden. Abschl iepend werden die definierten 
Zeichen in ein Basicprogramm geschrieben. was diese fur den 
spateren Gebrauch Oder zur Entwicklung eigener Programme wieder 
definiert. So wird die uastandliche Handhabung der Prograam- 
ierung der def inierbaren Zeichen uagangen. 
Preis: 25.- DM 
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GRAFIK-EOITOR: Wenn Sie Ihr Colour-Genie auf 32K RAM auf- 

geriistet haben, konnen Sie dieses Prograaa einsetzten, denn 

der "Grarik-Editor" hat eine Lange van 26000 Bytes 1 

Er bietet die Mogl ichkeit , GraTiken ia FGR-Modus wit einer 

Vielzahl von leistungsstarken Hoaaandos zu hreieren. 

Absent iepend taird ein Basic-Prograaa erzeugt werden, das. 

eingebunden in ein eigenes Prograaa, das Bild blitzschnell 

wieder auf den Bildschira bringt. Sie honnen also auch koaplexe 

Grafiken sehr schnel I fert igstel Len und sie hinterher beliebig 

verwenden. 

Preis: 69.- DM 

SHAPER: Die Handhabung des Basicbefehls "SHAPE" ist recht 
uastandlich. Hier bringt der "Shaper"* Abhilfe: Mit wen i gen 
Tastendriieken erzeugen Sie eine Figur, die abschl iefiend 
ia Foraat der "Shape-Table" abgespeichert wird. 
Preis: 25.- DM 

COLROT: Ein sehr niitzliches Graf ikprograaa. fur alle die ait 
jropen Texten Aufaerksaakei t erregen molten Cz.B. ia 
Schauf enster ) . Col rot erzeugt Laufschrif ten ait bis zu 512 
Zeichen Lange, Titel und FufJschriFt, Inversdarstel lung, Inter- 
aezzo u.v.a.a. Neu:Texte konnen auf Band gespeichert we r den. 
Ein koafortabler Editor eraogl ieht e in r aches Arbeit en. 
Preis: 69.- DM 

BASICODE 2 CM): Der neue Basicode-Standard fur das 
Colour-Genie Ckoapatibel zu Basicode 1). Dieses Prograaa 
aacht ihr Colour-Genie Basicode koapatibel ' 

Basicode 1st das Standard-Basic, in dea z.B. das WDR-Fernsehen 
Prograaae austrahlt. Eine Hardwareanderung ist nicht notig. 
Preis: 25.- DM 

ZEICHENEDITOR+s Dieser Editor, in Maschinensprache geschrieben. 

eraSglicht es alle 128 Zeichen sehr schnel I und koafortabel 

zu editieren. Dabei gibt es sogar Befehle ua Kreise zu 

zeichnen, Zeichen zu kopieren/dupl izieren/rot ieren/invert ieren 

u.v.a.a. 

Preis J 39.- DM 

BBSIC+5: Dieses Prograaa erweitert das noraale Basic ua 5 

Berehle: la Grafikaodus konnen beliebige Texte dargestellt 

we r den, Rechteckflachen konnen geaalt werden, ait "SRVE" konnen 

Machinenspracheprograaae gesi chert und ait "LOAD" koafortabel 

geladen werden. Ferner steht ein Eingabebef ehl zur verfugung. 

der an beliebige Speicherzel len schreibt, 

Preis t 33.- DM 

BASIC-PACKER: Der "Packer" ist ein auperst niitzliches Hilf- 
prograaa fur alle, die in Basic prograaa ieren . Die effektivste 
Funktion dieses Prograaas ist das "Packen", d.h. ein Basic- 
prograaa wird so stark wie aoglich gekiirzt, ohne dap die 
Prograaalogik verandert wird. Dies wird erreicht durch das 
Entfernen von Leerzeichen und Cauf Wunsch) REMs . sowie dadurch, 
dap so viele Befehle wie aoglich in eine Zeile gebracht werden. 
Vorteil: Das Prograaa wird schnel I er und hfirzer. Ferner kann 
der "Packer" entpacken, kilrzen ohne Zeilennuaaeriinderungen, 
renuabern und Zeilen verschieben. C32K RRM er f order I Ich!) 
Preis ! 39.- DM 
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ZEICHENSATZE: Dieses Progran I apt Sie den vorhandenen Zeichen- 
satz fur alle ASCI I -Zeichen wahlweise gegen einen von acht 
neuen, interessonten Zeichensatzen ersetzen. 
Fur dieses Progran aup Ihr Colour-Genie ait 32.K RAM 

ousgerustet sein. 
Preis: 25.- DM 

SCREEN- PR INTER: CAuch in del Buch "Das Colour-Genie-Buch 1" 
aufgel istet .) Auf dieses Progran haben die Besitzer des STAR- 
Druckers DP 510 bzw. DP 515 sicher gewartet ■ 

Es eraogl icht es Ihnen. den Bildschirm jederzeit koaplett nuf 
Ihren Drucher auszugeben. egal ob Sie la FGR- Oder n LGR-Modus 
sind. Defimerte und feste Graf lkzeichen we r den ebenfalls ait 
ausgedruckt. Auch fur dieses Programs brauchen Sie 32K RAM und 
naturlich einen STAR DP 510 / DP 515 Drucher. 
Preis: 33.- DM 

COLOUR- MONITOR III: Dieses Progran wird alle. die auf 

Maschinensprache-Ebene prograaaieren begeistern ■ 

Der "Colour-Monitor III" ist nicht nur em Monitor ait den 

ubl lchen Befehlen. Hie ASCI I -Dump, Hex-Duap, Disassea- 

bl ieren. Bander schreiben etc., sondern ein Monitor ait 

eingebautem Assembler, Find-Assembler und der Moglichkeit 

Maschinenspracheprograaae in Einzelschnttausfuhrung zu 

testen > Das Arbeit en wird neben dea Super-Befehlssatz 

durch raffmierte Aufteilung des BildscMras erleichtert. 

Fur dieses Prograaa benotigen Sie ein Colour-Genie ait 32K Raa. 

Ein ausfuhr I ich.es deutsches Handbuch I legt bei . 

Preis: 95.- DM D I SKVERS I ON : 105.- 0M 

COLOUR-FORTH: Endl ich gibt es eine leistungsstarke Version der 
Forth-Prograaaiersprache ouch fur das Colour-Genie 1 
"Colour-Forth" ist eine fur Hossettenbetneb angepapte Version 
des FIG-Forth, die ui viele Befehle fur das Colour-Genie 
erweitert wurde CGraphik, Ton...}. Der wesentliche Vorteil der 
Prograaaiersprache Forth ist die extrem schnel le 
Ausfuhrungszeit der Programme, die in unserem Forth noch durch 
Benutzung des eingebauten Assemblers gesteigert werden kann ■ 
Fur dieses Progran benotigen Sie 32K Raa, sowie die neuen 
Basic-Roas. die seit April "83 in alle Colour-Genies eingebaut 
sind. Ein ausf uhr I iches deutsches Handbuch wird ai tgel lefert . 
Preis: 95.- DM DISK VERSION: 105.- DM 

COLOUR-TEXT: Endl ich konnen alle Colour-Genie-Besitzer. die 
einen Drucher haben in den GenuB einer homrortablen Textver- 
arbeitung koaaen ' Colour-Text ermeitert die Bi Idschiribrei te 
auf 55 Zeichen, die aaxiaale Zeilenlange ist 64 Zeichen 
Chor lzontales Scrolling). Sie sind ait dea Cursor standig la 
Text, und keine Steuerzeichen verunstalten den Text, da die 
verschiedenen Schriftarten durch Farben gekennzeichnet sind. 
CFur Benutzer eines Schwarz/Weiss-Sichtgerates extra Status- 
zeile.) Das Progran unterstutzt alle gangigen Drucher (STAR, 
EPSON, ITOH. Typenrad) . Wenn Sie einen graf lkrahigen STRR-, 
EPSON- oder ITOH-Drucker haben konnen Sie sogar 
selbstdefinierte Graf ik2eichen in den Text einfugen ■ 
Ein deutsches Handbuch I legt bei. 
Preis: 95.- DM 0ISHVERSI0N: 105.- DM 
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12., } SPIELE unci 

GF*f=lR I KPBOQBAMME 

INVASION AUS DEM WELTRAUM: Em Maschinenspracheprogramm , das 
die Sound- u. Graf lkmogl ichkei ten des Colour-Genies vol I 
ausnutzt. Ihre Aufgabe ist es , einen Pulk von Invosoren 
abzuwehren, der sich der Erde nahert. 

Die Invasoren werden dabel lmmer schneller und gefahr I icher . 
Preis: 39.- DM 

PUNKTEJAQD: Bei diesem Spiel geht es darum. alle Punkte in 
emeu Labyrmt auf zusammeln, bevor Sie von einen Wachter 
eingeholt werden. Schnelle Grafik und Ton durch Maschinen- 
sprache. 
Preis: 25.- DM 

WURM: Unser derzeit schnellstes Re t ion-Spiel . Ein Wum kommt 
von oben den Bildschirm herab und versucht Sie zu vernichten. 
Dabet hat er die Spinne, die Fliege und die Ente als Hetfer. 
Kein Spiel fur ruhige Stunden 1 
Preis: 39.- OM 

BREAK OUT: Bei diesem Video-Spiel mu0 eine Mauer mit Ihrem Ball 
zerstort werden. Dabei konnen verschieden Schwier lgkei tsgrade 
vorgewahlt werden. Hohe Geschwindigkei t durch Maschinensprache- 
programmierung . 
Preis; 39.- DM 

OEMOPROGRAMM: Hiermit konnen Sie besser als mit der mit Ihrem 
Colour-Genie z.Zt. mi tgel leferten engl ischen Demokassette die 
Mogl lchkei ten Ihres Colour-Semes demonst r ieren , 
Preis: 25.- DM 

ANDROMEDA: Ein erstklassiges dreldimensionales Wei t raumspiel 

mit ansprechender Grafik. Feindliche Raumschi f f e honen auf Sie 

zu; vernichten Sie diese, bevor sie Ihnen wertvolle Energie ob- 

gesougt haben. 1st die Zeit abgelaufen, so eilt Ihnen Ihre 

flutterbasis zu Hilfe; aber das Auftanken will auch gelernt 

sein. 

Preis: 39.- DM 

MAU-MRU: Endlich haben Sie emen Spiel partner . der nicht wutend 
die Karten wegwirft. wenn er an verlieren ist. Dies durfte wohl 
aber auch selten der Fall sein. vielmehr wahrscheinl ich ist es , 
dap Sie den Computer vor Wut ausschol ten , do ihr Computer Dank 
einer hervorragenden Taktik auf Sieg programmiert ist. 
CEr schummelt nicht <') Gespielt wird nach den ubl ichen Regeln. 
Preis s 25.- DM 

HEKTIH: Stellen Sie sich vor. Sie waren in einetn Neubau mit 6 
Geschossen. bei dem die Ebenen durch Leitern verbunden sind. 
Detzt kommen Ihnen von oben Verfolger entgegen, Sie mupen sich 
ihnen stellen, denn es gibt keinen Fluchtweg. Graben Sie an 
strotegisch wichtigen Stellen Locher in den Boden . urn so Ihre 
Verfolger auszuscha 1 ten . 
Preis ' 39 - DM 
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METEOR: Em Super-Act ion-Spiel lm Grafik-Modus Ihres 
Col ourGenies. Sie befinden sich in einei Meteor itenf el d und 
werden von Meteoriten. Sternen und schiessenden Ufos bedrangt . 
Das Programm zeichnet sich durch sehr schnelle Grafik und gute 
Toneffekte aus . Preis: 69.- DM 

MOTTEN: Bei diesem Videospiel mupen Sie Kolonnen von Motten 
bekampfen, die in gefahrlichen Sturzflugen anfliegen und dabei 
ouch noch schiessen. 
Preis: 39.- DM 

PANIK: Ein Programm fur 2 Spieler. Man mup versuchen, den 
Gegner einzumauern. Wahlbare Geschwindigkei t macht "Mauer" 
entweder zu einera Reactions- oder zu einem St rategiespiel . 
Das Programm hann wahlweise lit Joysticks Oder mi t der Tastatur 
bedlent werden. 
Preis: 25.- DM 

TAUSENOFU0: Hier sollen Sie einen Wur« so steuern, da0 er nur 
Putter aber kein Gift fnpt. Dazu kommen noch Hraftfutter und 
Gegengift. Ein sehr unterhal tsames Geschickl ichkei tsspiel fur 
die ganze Familie. Bei Spielbeginn konnen viele verschiedene 
Geschwindigkei ten und Schwier lgkei tss tuf en vorgewahlt werden, 
Preis: 39.- DM 

COLOUR-SCHACH : Jetzt konnen Sie gegen Ihr Colour-Genie auch 
Schach spielen. Colour-Schach bietet 4 verschiedene Spiel- 
starhen. Bufzeichnung eines laufenden Spieles auf Kassette. 
Andern von Stellungen, einen Demonst rat lonsmodus und anderes 
raehr. Die Figuren werden auf ansprechende Weise grafisch 
dorgestel I t . 
Preis: 69.- DM 

EXNIMROID; Ein Denkspiel, abgeleitet vom bekannten Nim-Spiel. 
Es geht darum. aus mehreren Haufchen den letzten Spielstein 
zu nehnen. Sie spielen gegen den Computer. 
Preis: 25. DM 

KINGS: Eine Regierungss lmulat ion , bei der Sie fur eine Dauer 
von 8 Oahren eine Insel regieren sollen. Dabei hann nur der 
kluge Einsatz aller Faktoren zu einem Erfolg fuhren. Haben 
Sie Ihre Amtszeit uberlebt, werden Ihre Taten ausgewerted, und 
Sie konnen dann auch welter regieren. 
Preis: 25. DM 

CONQUER: Ein spannendes Videospiel - erobern Sie die 
Spinnenf estung > 
Preis: 25.- DM 

JOKER-POKER: (Autor: 0. Buchmul I er 5 Pokern Sie gegen Ihr 
Colour-Genie ' Tolle Grafik und guter Sound. 
Preis: 39.- DM 
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MAMPFMAN: Ahnlicrt wie unser Spiel "Punkte jagd". nur dap Sie 
hier von mehreren Gespenstern verfolgt werden, die Sie unter 
bestimmten Bedingungen jedoch auch fressen konnen . 
Preis: 25.- DM 

MAMPFMAN 2: Die neue Version von Mamprman ' Excel tente Qrafik 
und hohe Spieldynamik. Ein sehr empf ehl enswertes Programm ' 
Preis: 39.- DM 

COLOUR-KONG: Das absolute Videospiel ' Retten Sie Ihre 
Freundin vor dem wilden Affen. Mehrere Ebenen, super Grafik 
und Musik. Aur dem Bond finden Sie Versionen fur 32K und 
16K RAM 

Preis: 69.- DM 

PANZERHAMPF: Ein Spiel fur zwei Personen (JOYSTICKS und 32K RAM 
erf order I lcrO . Liefern Sie sich mit Ihrem Gegner spannende 
Pnnzerschtachten i Dos Program verfugt uber 3 verschiedene 
Gelande nut Minen etc. 
Preis: 69.- DM 

EIS: Ein sponnendes , zugleich jedoch auch recht schwier lges 
Actionspiel mit st rategischen Elementen. Sie befinden sich in 
einem Kuhlraum und mupen Eisblocke so ans Rutschen bringen, dap 
die gef ahr I ichen Schneemonster vernichtet werden. 
Preis: 39.- DM 

EAGLE: Vernichten Sie verschiedene Schwadronen von Vogetn. 
bevor Sie versucnen das grope Hut terschi f f zu zerstoren. 
Preis: 39.- DM 

GAME of LIFE: Dieses bekonnte Programm simuliert das Wachstum 
von Bakter lenkul turen. Die Regeln werden in Programm erklart 
und einige interessante Figuren sind fest abgespeicher t . 

Preis: 25.- DM 

SAUS: Ein tustiges Videospiel, bei dem Sie aus einem 

unter i rdischen Labyrmt Termiten onsaugen muften. wobei Sie sich 

vor giftigen, roten Ternten huten mupen. 

Das Spiel knnn auch mit Joysticks gesteuert werden. 

Preis: 39.- DM 

ExREVERSIC: Spielen Sie Reversi gegen Ihr Colour-Genie • 
Dabei kann zwischen mehreren Spielstufen gewahlt werden. 
Das Spielbrett wird auf ansprechende Weise graphisch 
dargest el 1 1 . 
Preis- 39,- DM 

BANG-BANG: Zwe i Cowboys begegnen sich in der Prarie und liefern 
sich ein erbittertes Duel I, Fur dieses Spiel sind Joysticks 
er forder I ich. 
Preis: 39-- DM 

NETZO: Versuchen Sie mit Ihrem Pinsel alle Flachen auszumalen. 
ohne von Ihren Gegnern erwischt zu werden. 
Preis i 39.- DM 
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DEATH-TRAP, ein dreidi mens lonales Graf lk-Abenteuerspiel 
[Adventure) : 

Ein Programm 2u> wahnsinmg werden 1 Sie befinden sich in einen 
Labyrinth mit uber 1100 Raumen. in den es von gefahr I ichen 
Einwohnern und Gegenstanden wimmelt. Finden Sie die wichtigen 
Gegenstonde und wenden Sie sie richtig an, urn aus dem Labyrinth 
zu entkommen . Zwei Vorraussetzungen mussen allerdings erfullt 
sein: Ihr Colour-Genie mup 32K RAM haben , und Sie mussen 
elementare Engl ischhenntnisse besitzen. da die Sie Hommandos in 
Form von englischen Satzen eingeben. 
Preis: 69.- DM 

TCS-CHOPPER: Die Geschmaeker sind verschieden - aber dies 1st 
wohl das beste Videospiel . das es z.Zt. fur das Colour-Genie 
gibt • Dreizehn Ihrer Kameraden sind in einem von vier riesigen 
Labyrinthen ausgesetzt worden. Versuchen Sie nun. diese mit 
Ihrem Hubschrauber zu retten" Aber Vorsicht. Ihre Freunde 
werden scharf bewacht ' 
3ZK RAM sind auch hier notwendig. 
Preis: 69.- DM 

DOPPEL-WURtl: Vielleicht kennen Sie unser beliebtes Spiel 
"Tausendf u0". "Doppel -Wurm" ist sehr ahnlich, allerdings 
spielen hier zwei Spieler gegeneinander , was die Spannung 
naturlich erhoht . Achtung: Nur fur Ooyst lck-Besi tzer i 
Preis: 39.- DM 

MADTREE: Ein schwieriges Videospiel: Sie sind eine flei0ige 
Biene und mussen eine Reihe von Blumen standig bestauben, damit 
diese nicht emgehen. Doch diese Blumen sind undankbar und 
gefahrden Sie. 
Preis: 39.- DM 

DIG-BOY: In Ihrem unter l rdisehen Reich kampTen Sie gegen 

Drochen urid andere Untiere, Locken Sie diese unter einen 

der wockl lgen Felsen. um sie zu zerschmet tern . 

Dieses Spiel ist sehr empf ehlenswert . da es eine Menge 

Abwechslung bietet. 

Preis: 39.- DM 

EMPIRE: Fur alle, die nlcht nur reine Ahtion wollen. 1st 
"Empire" das ideale Spiel. Dieses Spiel kann mit bis zu sechs 
Spielern gleichzeitig gespielt werden. der Computer spielt 
ebenfal Is mit. Jeder Spieler hat ein kleines Reich, das nun 
durch Handel, Politik, Krieg u.s.w. zu Wohlstand kommen soil. 
Dabei stehen Sie mit den anderen Nationen standig in Beziehung, 
sei es durch Handel oder durch Krieg. 

Ansprechende Grafik macht das Program noch interessanter . 
Ihr Colour-Genie mup fur "Empire" auf 32K RAM aufgerustet sein. 
Preis: 69.- DM 
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LUNAR -LANDER: Eltie perfekte Mondlandungss imul ot ion mit Super- 
grafik ' Die Idee 1st zwar alt, aber die Ausfuhrung dieses 
Programmes macht den "Lunar-Lander" zu emeu unserer besten 
Spiele. Sie benotigen 32K Ram. Das Spiel Kann wohlweise auch 
mit den EG2013-3oyst icks gesteuert warden. 
Preis: 39.- DM 

COLOUR-FROGGER: Retten Sie Ihren Frosch zuerst uber die Strape 
und dann uber den Flup i Ein spannendes Unterhal tungsspiel . 
an de« die ganze Fantilie lange Zeit Spass haben wird. Besonders 
gelungen ist bei diesetn Programm die musiklische Untermalung. 
Preis: 39.- DM 

CRAZY-PRINT: Das neueste Spiel von 3. Buchmuller, dem Author 

des TCS-Choppers - Super -Grafik und Super-Ton > 

In 16 Levels mussen Sie. ahnlich wie bei unserem Spiel 'Netzo', 

versuchen alle Flachen auszumalen , ohne sich von den hektischen 

Gegnern erwischen zu Lassen. 

Preis: 69.- DM 

MEMORY; Das bei lebte Brettspiel nun auch als Version fiir das 

Colour-Genie ' 

Schone Grafik und die gute Spiel idee raachen dieses Programm 

empfehlenswert . 

Preis: 39.- DM 

GALACTIC ATTACH: Das neue Spiel von Klaus Weber. Versuchen Sie 
eine Vielzahl wilder Angreifer so lange wie moglich zuruck- 
zuhalten. Ein sehr schnelles Spiel mit guter Grafik. 
Preis: 39.- DM 

COLOUR-SKAT: Oetzt konnen Sie auch Skat gegen Ihr Colour-Genie 
spielen ■ Wenn Sie mal Lust zum Skat spielen haben. Ihnen aber 
die Spielpartner fehlen. spielen Sie halt gegen den Computer i 
Gute Grafik. Achtung: 32K RAM sind notwendlg. 

Prei5: 39.- DM 

Colour-Genie - FLUGSIMULATOR: Endlich 1st er da iiii 

Der Colour-Genie Flugsimul ator bietet dreidimens lonale Dar- 

tellung in Echtzeit. Radar. 18 Instruments. Luftkampf modus ... 

Ein Programm. dap jeder Col our-Geme-Besi tzer haben sollte i 

Eine ausfuhrliche deutsche Anleitung I iegt bei. 

Achtung: Das Programm benotigt 32K RAM. 

Preis; 69.- DM 
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MUSIH.PROQRRMME 



MUSIKs Dieses Programm spiel t festprogrammierte Musikstiicke 
mit verbliif fender Qualitat. 
PreiS: 25.- DM 

ORQEL: Spielen Sie Orgel auf Ihrem Colour-Genie i 
Ihnen stehen zwei Manual e, einstell bares Delay und sogar 
eine Sch' agzeugbegl ei t ung zur Seite, 
Preis: 25 . - DM 

COLOUR-SYNTHESIZER: Ein Program, das man gesehen haben mu0, ui 
es iiberhaupt fur moglich zu halten. Oer Colour-Synthesizer 
tuacht aus Ihrem Colour-Genie einen vollwertigen 3-Kanal 
Synthesizer mit VCO. VCft, Hullkurve. Schl agzeug . . . 
Acht Einstel lungen aller Regler honnen vorprogrammiart . aur 
Tostendruck abgerufen und auf Band gesichert werden. 
Verbliif fend ist auch die graphische Darstellung. 
Preis: 69.- DM 

COMPOSER: Mit diesem Prograin konnen Sie sehr einfach eigene 
Musikstiicke komponieren. Noten, Pausenzeichen u.s.w. werden 
grafisch dargestellt, konnen editiert und auf Band gespeiehert 
werden . 
Preis: 39.- DM 
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i4. . D LERNPROQRAMME 

ELEKTRONIKPROSRftMME 

MRTHEMATIK-LERNPROGRAMM: Interessant fur Kinder in Grundschul- 
alter. Wahlweise konnen die vier Grundrechenarten geubt werden, 
wobel man 2wlschen verschiedenen Schwier lgkei tsgraden wahlen 
kann. Lustige grafisehe Gestaltung sorgt dafur. dap das Uben 
Spass macht . 
Preis: 25.- DM 

GRUNDEIGENSCHAFTEN DES LICHTS (OPTIK): Oiese 32KByte lange 

Programm erklart die Brechung, Reflexion, verschiedene 

L insentypen . . . Ansprechende Graf [K, Benutzeremgaben, Menu und 

Ubungsauf gaben machen dieses Programm sehr lehrreich. 

Preis; 39.- DM 

NE555: Erklarung und Anwendung des Timer- ICs NE555 werden mit 
diesen Programm zut Hinderspiel . Tot Le Grafih und ausfuhr I iche 
Ookument at ion heben dieses Programm hervor. 
Preis: 25.- DM 

PLOTTER: Plotter ist ein anspruchsvol I es Mathent ikprogramm . das 
beliebige Punktionen zeichnet . Wertet abel len erstellt ... 
Preis: 39.- DM 

PHYSIH DES TRANSISTORS: Ahnl ich aufwendig wie beim Program! 

'Optik' werden Sie hier in die Grundeigenschaf ten des 

Transistors, verschiedene Schaltungen, Kennlinien u.s.w. 

eingewiesen. 

Fur dieses Programm sind 32K Byte RAM erf order 1 ich. 

Preis: 39.- DM 

LANDER-QUIZ: (Autor K. Weber) Ein ganz toll aufgemachtes Lern- 
programm, das zugleich ols Gesel Ischaf tsspiel mit bis zu 8 
Personen gespielt werden kann. Das Programm stellt jedem 
Spieler verschiedene Rrten von Fragen. die teilweise durch eine 
Eingabe oder durch 'Zeigen' mit einem Kursor auf der Weltkarte 
beontwortet werden- De nachdem. wie gut die fintwort ist, gibt 
es dann Punkte. C32K ROM er rorder I ich ' ) 
Preis: 39.- DM 

OPERATIONSVERSTARHER APPLIKATIONEN (OPAMAP. Autor: U. Gerber): 
Fur jeden, der sich mit Elektronik beschaftigt, ist dieses 
Programm eine wahre Freude ' Zwolf der wichtigsten Opamp- 
Schaltungen konnen mit diesem Programm komplett dimensioniert 
werden, wobei der Scholtplon graphisch dargestellt wird. 
Mitgetiefert wird ein 50-seitiges Lehrbuch, dap die Eigen- 
schaften und Verwendung lm allgemeine, und die Appl lkat ions- 
schaltungen lm speziellen erklart. Sehr empf ehl enswert ' 
C32K RAM erforderlich i] 
Preis: 69.- DM 



5. 3 DISKETTENPBOQRAMME 



Alle Programme, die Sie auf den vorangegongenen Seiten finden 

sind. bis ouf 'Deathtrap* ouf Diskette erhaltlich. 

Sel bst verstandl ich brauchen Sie fur alle Programme ein 

Colour-Genie nit 32K RAM. 

Bltte addieren Sie bei Bestellung ouf Oisk jeweils 

DM 10.- zum Listenpreis fur die Diskette i 



Im folgenden finden Sie eine Liste von Progronmen, die 
speziel 1 fur Diskette geschrieben sind: 



TAPE-DISK-CONVERTER: Dieses Programm ermoglicht es Ihnen. Ihre 
Maschinenspraehe-Kassetten Csofern ungeschutz t J auf Diskette zu 
uberspielen, wobei erne Verschiebung in Speicher moglich ist . 
Auperdem konn man von Diskette auf Diskette, von Kassette auf 
Kassette und von Diskette auf Kassette uberspielen. 
Preis: 45.- DM 

COLZAPj rlit "Colzap" konnen Sie auf jeder Cungesehutzten) 
Colour-Genie-Diskette alle Sektoren lesen. beliebig ondern 
(in ASCII oder Hex), Sektoren schreiben, den Disknamen 
onzeigen, den freien Platz auf der Diskette ausgeben lassen. 
u.a.m . 
Preis: 45.- DM 

2EICHENEDIT0R DISK: CAutor: J.Buchiul ler) Dieses Programm ist 
rein in Maschinensprache geschrieben und ist daher sehr schnel I 
und komfortabel. Es kann on mehreren Zeichensotzen gleichzeitig 
gearbeitet werden. die dann auch ouf Diskette gesichert werden 
konnen . 
Preis: 70.- DM 

Ferner verfugbar (Funkt lonsbesehreibung siehe fruherl: 

COLOUR-ASSEMBLER Dlshversion Preis: 95.- DM 

COLOUR-MONITOR III DiskverSlOn Preis : 105.- DM 

COLOUR-FORTH Diskversion Preis: 105.- DM 

COLOUR-TEXT Diskverion Preis: 105.- DM 
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1_ ITERr^TLJR 



Beachten Sie ouch die fur das Colour-Genie I leferbaren Bucher: 

Techmsches-Handbuch i Enthalt die kompletten Schal tplone. 
Erklarungen, CRTC-Unter t agen. PSG-Unter lagen . . . 
Preis: 49.- DM 

DFlS TCS Colour-Genie ROM LISTING CRutor K.Hampn: Unerlaplich 
fur den Moschinensprache-Programmierer . In diesem Buch ist der 
komplette ROM und reservierte RftH aufgelistet und erklart. 
Insgesamt uber 300 Seiten ' SO Seiten wertvotle Erklarungen ' 
Hontplett und richtig erklorte ftri t hmet lk-Rout men * 
Pre is: 59.- DM 

DflS COLOUR-GENIE BUCH I : fluT uber 100 Seiten finden Sie hier 
mteressante Programme - von Spielen bis zu Hi \ fsprogrammen, 
zuk Teil auch in Maschinensprache - sowie wertvolle Tricks und 
Erklarungen. Ein Mup Tur jeden Col our-Genie-Besi tzer i 
Preis: 39.- DM 

DPiS COLOUR-GENIE BUCH II : Noch uifangreicher als unser 

'Bestsel ler* Das Colour-Genie Buch I* enthalt dieses Buch wieder 

viele mteressante Tricks und Programme, darunter ein komplett 

gelistetes und erklartes Moschinensprache-ftct lonspiel ' 

Sehr interessant fur Disket tenbenutzer : Wie lese/schreibe ich 

Sektoren von Basic aus. und wie kann ich meihe Oisketten 

schneller format leren ? 

Pre is: 39.- DM 

******** ***** ************************************************** 
**** STAND DER TCS SOFTUIAREL ISTE COLOUR-GENIE VOM 24.3.84 **** 
a*************************************************************** 



101 



BESTELLFORMULftR 

Zur Besteltung von Col our-Genie-Programmen konnen Sie dieses 
Formular benutzten. Schicken Sie dieses an Ihren GENIE-Handler 
Oder direkt an TCS Computer GmbH 

Kolnstrape H 

5205 St. August in 2 

Tel - : 02241 • 28071 

Bonkverbindung; 
Rai f feisenbank Menden 8LZ 37069507 Honto-Nr, 1525 

Oer Versand erfolgt per Nachnahme oder Vorauskasse auf obiges 
Konto Cdies naturlich nicht, wenn Sie bei IKrem Handler 
bestel I en) . 



Ich bitte um Zusendung folgender TCS Col our-Genie-Programme : 



flnzahl : Name des Programs : Preis/DM : Gesamt 



Gesomt : DM 

Meine Adresse ist : 

Name : 

Strafie: 

Or t : 



Datum: Unterschr l f t i 
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